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EINLEITUNG 


K ennen Sie das? Man sitzt ge¬ 
rade voller Stolz vor seinem 
neuen C64 und beschäftigt 
sich mit der Bedienungsanleitung für 
den Computer. Nach kurzer Zeit geht 
einem ein Stöhnen über die Lippen, 
denn vor Ausführlichkeit strotzen die 
Begleitunterlagen gerade nicht. 

Deutlich erinnert man sich an ein 
altes Sprichwort: »Aller Anfang ist 

schwer«. 

Aber das muß nicht immer so 
sein. Wir wollen Sie mit Ihren Pro¬ 
blemen nicht allein lassen, sondern 
dafür sorgen, daß Ihnen die ersten 
Schritte mit dem Computer nicht so schwerfallen und 
Sie auch Spaß an dem C64 haben. In diesem 
Sonderheft finden Sie daher wichtige Informationen 
und nützliche Programme für den Einstieg in die 

C64-Welt. 

In einem sehr ausführlichen Grundlagenteil erfah¬ 
ren Sie, welche Fähigkeiten im C64 stecken und wie 
Sie ihn sinnvoll anwenden können. Grafik, 
Daten-Fernübertragung und Textverarbeitung seien 
hier nur als Stichworte genannt. Ein besonderes 
Augenmerk sollten Sie auf zwei Kurse werfen, die Sie 
mit dem Innenleben Ihres Computers vertraut 
machen. Die Arbeitsweise dieser hochtechnischen 
Geräte ist anschließend kein Buch mit sieben Siegeln 
mehr. In verständlicher Form erfahren Sie zusätzlich 
alles über die Speicheraufteilung. Wenn Sie selbst 
programmieren, wird dieser Artikel immer ein hilf¬ 
reiches Nachschlagewerk bleiben. 
Um Ihnen den Umgang mit dem Computer zu er¬ 
leichtern, haben wir nützliche Programme für Sie 
zusammengestellt, die Sie nur abzutippen brauchen. 
Die Diskettenverwaltung »ProDisk« wird auf komforta¬ 
ble Weise dafür sorgen, daß Ihnen der Überblick über 
den Inhalt Ihrer Disketten nicht verlorengeht. Mit dem 


Disketten-Kopierprogramm können 
Sie die kleinen Scheiben mit den 
notwendigen Inhalten versehen. 

Für Schüler und alle, die Ihre 
Sprachkenntnisse aufbessern wol¬ 
len, ist der Vokabeltrainer ein hervor¬ 
ragendes Hilfsmittel. Wer dichterisch 
angehaucht ist, wird viel Spaß mit 
dem Programm »Lyrik-Maschine« 
haben. Mehr will ich dazu hier nicht 
verraten. 

Auch für diejenigen, die der Muse 
zugeneigt sind, ist in diesem Son¬ 
derheft ein interessantes Programm 
enthalten. Der »Sound-Editor« ver¬ 
wandelt den C64 in einen kleinen Synthesizer. Ein 
vorangehender Musikkurs erklärt Ihnen, wie sich die 
interessantesten Klänge aus ihrem Sound-Baustein 
herauslocken lassen. 

Jeder, der mit einem Computer arbeitet, ist dankbar 
für Kniffe und kleine Softwarehilfen, die einem das 
»Computerleben« erleichtern. Die Rubrik »Tips&Tricks« 
soll diese Aufgabe erfüllen. »Fastload« und »Hypra- 
Save« sind kurze Programme, die dem recht langsa¬ 
men Floppylaufwerk auf die Beine helfen und es beim 
Laden und Speichern beschleunigen. 

Eine Besonderheit, von der nicht das Geringste im 
C64-Handbuch zu finden ist, sind die synthetischen 
Steuerzeichen. Mit diesen lassen sich Basic- 
Programme kürzer und effektiver gestalten. 

Natürlich ist auch etwas zum Entspannen dabei. 
Zwei hervorragende Computerspiele sorgen dafür mit 
viel Action und Geschicklichkeit. Wir wünschen Ihnen 
viel Freude und Spaß dabei. 


Ihr Gottfried Knechtei 
(Leitender Redakteur) 


Aller Anfang 





Der schnellste Fehlerteufel geben Sie im Direktmodus, also ohne Zeilennummern, 

die nachstehenden Basic-Befehle ein. Drücken Sie am 
Irren ist menschlich, das gilt auch für die besten Auto- Ende jeder Zeile immer wie angegeben die RE- 
ren, Tester und Redakteure. Doch die 64’er-Redaktion TURN-Taste. 


steckt dann nicht den Kopf in den Sand, sondern teilt 
den Lesern mit, was schiefgegangen ist. Im 64’er- 
Stammheft finden Sie im »Fehlerteufel« Korrekturen zu 
vorangegangenen Stamm- und Sonderheften, die uns 
bekanntwerden. 

In diesem Sonderheft ist es soweit: Der Fehlerteufel 
hat sich selbst überholt. Weit nach Redaktionsschluß ist 
unsein Fehler zum Programm »ProDisc« bekanntgewor¬ 
den. Die Produktion der entsprechenden Seiten war je¬ 
doch schon so weit fortgeschritten, daß nichts mehr zu 
ändern war. Darum teilen wir Ihnen hier mit, wie Sie den 
Fehler beheben können. 

ProDisc - eine professionelle Diskettenverwal¬ 
tung, Seite 71 

Wenn Sie die abgedruckte Variante des Programms 
starten, dann fehlen auf dem Bildschirm die Bildsymbo¬ 
le am rechten Rand. Um dies zu korrigieren, gehen Sie 
bitte folgendermaßen vor: Laden Sie »PRODISC« (Li- 
sting 1), starten es aber nicht (kein RUN eingeben). Jetzt 


POKE 2089,108 <RETURN> 

POKE 2204,32:POKE 2205,186:P0KE 2206,255 <RETURN> 
POKE 2213,32:POKE 22l4,189:P0KE 2215,255 <RETURN> 
POKE 2222,32:POKE 2223,213:P0KE 2224,255 <RETURN> 
POKE 45,24:POKE 46,9 <RETURN> 

Speichern Sie jetzt das neue Ladeprogramm mit 
SAVE "PROLADER" ,8 <RETURN> 

Geben Sie unmittelbar danach wieder im Direktmo¬ 
dus ein: 

POKE 45,193:POKE 46,12 <RETURN> 

FOR 1=2048 to 2432: POKE I,0:NEXT:POKE 43,0 
<RETURN> 

Das nun erzeugte Programm speichern Sie mit 
SAVE "CCTSPR" ,8 < RETURN> 

Nach diesen Korrekturen halben Sie ein voll funk¬ 
tionsfähiges Programm. Sie können es mit LOAD 
"PROLADER",8 laden und mit RUN starten. Auf der 
Programmservice-Diskette zu diesem Sonderheft ist 
ProDisc selbstverständlich fehlerfrei enthalten. 
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fantastischen Gra¬ 
fikfähigkeiten des 
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Sie sehen richtig - diese faszinierende Grafik wurde 
mit dem C64, dem Computer Ihrer Wahl, geschaffen. 
Weitere Grafikbeispiele und Informationen, mit wel¬ 
cher Software Sie solche Grafiken selbst hervor¬ 
zaubern können, lesen Sie auf Seite 14 
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Wollen Sie wissen, welche Fähigkeiten sich in 

Ihrem C64 verbergen und was Sie mit ihm alles 47 
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Computeranwendungen ist, erfahren Sie hier 
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»Auf welcher Dis¬ 
kette war denn das 
Programm...?« 
Diese Frage gehört 
mit »Prodisc« der 
Vergangenheit an. 
Über 1700 Pro¬ 
gramme werden 
komfortabel ver¬ 
waltet. Seite 71 



Geos: Das Komplettsystem mit Komfort 
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außerdem schnell abgetippt ist 

H 76 



Entspannung muß sein: Und was eignet sich 
besser dazu, als ein spannendes und actionreiches 
Computerspiel wie »Block'n Bubble«, das Sie als 
Listing zum Abtippen in diesem Sonderheft finden. 

Seite 140 
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Eine tolle Adreß- 
verwaltung ist un¬ 
ser Listing 
»Master-Adress«. 
Zusammen mit 
Master-Text können 
Sie problemlos Se¬ 
rienbriefe, Aufkle¬ 
ber und Etiketten 
drucken. Seite 83 


Graphic Art - die Antwort auf das Sprite-Problem 

Von nun an können Sie mehrfarbige Sprites 
leicht konstruieren und bearbeiten 


79 





Ohne Einblicke in das Innenleben und die Funktions¬ 
weise eines Computers, tut man sich oft schwer. 
Dieser Beitrag informiert Sie auf verständliche Weise 
über die grundsätzliche Funktionsweise eines 
Computers. Sie erfahren, was eigentlich in einem 
Computer abläuft, während Sie mit ihm arbeiten und 
erhalten einen Überblick darüber, welcher Baustein 
für welche Aufgabe zuständig ist. Seite 26 


Mit seinem einge¬ 
bauten Synthesizer 
ist der C64 ein 
wahres Sound- 
Wunder. Mit dem 
Programm »Sound- 
Editor« werden Sie 
selbst zum moder¬ 
nen »Bithoven«. 
Seite 110 
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Drucker gibt es wie Sand am Meer. Damit Sie beim 
Kauf mit der Qual der Wahl nicht alleine stehen, 
erwartet Sie ein interessanter und informativer 
»Einkaufsbummel« für Drucker, der Ihnen helfen soll, 
die richtige Entscheidung zu treffen. Seite 11 


Serienbriefe und Etiketten mit Master-Adress 

Eine sinnvolle und nützliche Dateiverwaltung, 
kompatibel zur Textverarbeitung »Master-Text« 

H 83 
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Jetzt kann der C64 auch noch dichten 
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Alle Programme aus Artikeln mit einem H -Symbol finden Sie auch 
auf der Programmservice-Diskette zu diesem Sonderheft 
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HARDWARE 


C64, C 128 


Der Weg zum ridrtigen Monitor 


Genügt ein normaler Fernseher oder braucht 
man einen richtigen Monitor, um seinem Compu¬ 
ter all das zu entlocken, was er optisch zu bieten 
hat? Hier sagen wir Ihnen, was Sie bei Ihrer Ent¬ 
scheidung beim Kauf eines Monitors für Ihren 
Computer berücksichtigen müssen. 


Spielen kaum die eigene Spielfigur von gegnerischen Spri¬ 
tes unterscheiden - von Textverarbeitung ganz zu schwei¬ 
gen. Oder das eigene Bedürfnis, seinem Hobby am Com¬ 
puter nachzugehen, kollidiert aufs Heftigste mit dem der 
Familie, die nächste Folge von Dallas nicht zu verpassen. 
Es drängt sich also die Entscheidung auf: Ein Monitor muß 
her - aber welcher? 



W er hat das, zumindest am Anfang seiner Beschäfti¬ 
gung mit dem Computer, nicht erlebt? Man hat für 
seinen C64 oder C128 tief in die Tasche gegriffen, 
gleich auch noch eine Diskettenstation und gar einen 
Drucker gekauft. Da in so gut wie jedem Haushalt ein Fern¬ 
seher steht, glaubte man, sich wenigstens diese Investition 
sparen zu können - und schon tauchen 
die ersten Probleme auf. 

Der für den Betrieb 
am Computer vorge¬ 
sehene Fernseher 
liefert ein recht ver¬ 
schwommenes Bild. 

Man kann bei 


Zunächst sollten Sie sich darüber im klaren sein, was Sie 
mit Ihrem Computer machen wollen. Sofern Sie sich zu den 
Einsteigern zählen: Setzen Sie Ihre Qualitätsansprüche 
nicht zu tief an - diese wachsen im Lauf der Zeit und der Mo¬ 
nitor sollte mithalten können. 

Mit den Anschlußkabeln vom Computer zum Monitor ist 
es so eine Sache. Die einfachste, aber auf Dauer unbefrie¬ 
digendste Lösung ist der Anschluß mit dem 
Antennen-Kabel (Bild 1). Deutlich sieht 
man hier auf der rechten Seite im 
4-MHz-Bereich, daß die eng ne¬ 
beneinanderliegenden senk- 
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HARDWARE 


rechten Linien den Fernseher überlasten. Statt dessen bil¬ 
det er nur noch rotgrüne Interferenz-Muster ab. Besser ist 
hier schon die direkte Verbindung über die Video/Audio- 
Buchse (Bild 2). Die Linien sind schon etwas besser zu er- 



Bild 1. Bildausschnitt von einem Farbfernsehgerät mit 
Anschluß über das Antennenkabel 

kennen. Hier taucht aber das Problem auf, daß der Monitor 
oder das Fernsehgerät Ihrer Wahl auch die richtigen Buch¬ 
sen mit der entsprechenden Pinbelegung haben muß. Hier 
finden sich zum einen die VCR-Buchse (Bild 3), zum ande¬ 
ren die SCART-Buchse (Bild 4), die mit der Video/Audio- 
Buchse am C64 (Bild 5) verbunden werden müssen. Vor 
dem Kauf des Monitors oder Fernsehgerätes sollten Sie 
sich auf jeden Fall vergewissern, daß die entsprechenden 
Kabel auch erhältlich sind, damit der Anschluß nicht mit 
größerem Lötaufwand verbunden ist. 

Vöm Bildschirmspeicher zur Bildröhre 


Sollten Sie einen C128 Ihr eigen nennen, und wollen Sie im 
80-Zeichen-Modus oder mit CP/M arbeiten, so ist die Wahl 
des Monitors von vornherein sehr eingeschränkt, denn Sie 
benötigen einen Monitor mit RGB-Buchse und Chromi- 
nanz/Luminanz-Eingang. Und diese beiden Eingänge be¬ 
sitzt zum Beispiel der Commodore-Monitor 1901 für den 
C128. Die Produktion dieses Monitors läuft nach Aussagen 
von Commodore jetzt aus. Als Nachfolger wird der Monitor 
1084 empfohlen, an den sich sowohl C64/C128 und auch 
der Amiga problemlos anschließen lassen. Mit diesen Mo¬ 
nitoren können Sie in allen Betriebsarten arbeiten. An der 
Qualität des Bildes gibt es dann kaum mehr etwas auszu¬ 
setzen. 

Doch wie kommen diese Unterschiede in der Bildqualität 
zustande? Dazu müssen wir den Weg verfolgen, den die 
Bildinformation vom Computer zum Monitor nimmt. 

Bei einem Fernseher, der mit einem normalen Koaxialka¬ 
bel, wie es dem C64/128 beiliegt, an der Antennenbuchse 
angeschlossen wird, ist der Weg des Signals folgender: 

Die im Bildschirmspeicher des Computers vorliegenden 
digitalen Bilddaten werden vom VIC zu einem Videosignal 
aufbereitet. Dieses wiederum wird in einem Modulator zu 
einem hochfrequenten Antennensignal umgeformt und so 
über das Kabel dem Fernseher zugeführt. Dieser erzeugt 
wieder ein Videosignal, das der Bildröhre zugeführt wird. 
Dieser aufwendige Prozeß kann natürlich die Qualität des 
ursprünglichen Signals erheblich beeinträchtigen. 

Anders ist es dagegen, wenn der Fernseher über einen 
Video-Eingang verfügt, der mit einem geeigneten Kabel di¬ 


rekt mit der Audio/Video-Buchse des Computers verbun¬ 
den werden kann. Dadurch entfällt der hochfrequente Teil 
des Übertragungsweges, was die Bildqualität positiv beein¬ 
flußt. Doch auch hier gibt es noch große Qualitätsunter¬ 
schiede zwischen den einzelnen Fernsehgeräten, die im 
folgenden behandelt werden sollen. 

Wichtigstes Kriterium bei allen Typen von Datensichtge¬ 
räten ist die Qualität, beziehungsweise die Schärfe, mit der 
die Zeichen auf dem Schirm erscheinen. Vor allem bei 
Fernsehgeräten sollte man auf diesen Punkt verstärkt ach¬ 
ten. Denn hier gibt es gravierende Unterschiede. Das liegt, 
wie beschrieben, am Weg, den die Signale vom Computer 
bis zum Bildschirm beschreiten müssen, zum andern an 
der Bandbreite des Videoverstärkers im Fernseher selbst. 

Scharfe Sache 


Diese bewegt sich bei den meisten Fernsehgeräten zwi¬ 
schen 5 und 7 MHz. Um sich die Bedeutung dieser zu¬ 
nächst sehr theoretisch anmutenden Größe zu verdeutli¬ 
chen, wollen wir folgende Rechnung anstellen: 

Um ein flimmerfreies Bild zu erzeugen, muß pro Sekun¬ 
de eine genügend hohe Zahl von Einzelbildern am Schirm 
erzeugt werden, um das menschliche Auge quasi zu überli¬ 
sten, so daß es die einzelnen Bilder nicht mehr wahrnimmt 
und den subjektiven Eindruck eines ruhigen, nicht flim¬ 
mernden Bildes gewinnt. 

Nach unserer Fernsehnorm (CCIR-Norm PAL B/G) ist die 
Dauer eines Elektronenstrahl-Durchlaufs gleich der Netz¬ 
frequenz von 50 Hz. Das heißt: 50mal pro Sekunde bewegt 
sich der Elektronenstrahl zeilenweise von rechts oben nach 
links unten. Da jedoch dertechnische Aufwand zu hoch wä¬ 
re, u.~i 50 »ganze« Bilder in jeder Sekunde zu schreiben, 
verfiel man auf den Trick mit dem »Interlace-« oder Zeilen¬ 
sprung-Verfahren (Bild 6). Hier werden pro Sekunde 50 
»halbe« Bilder geschrieben. Und zwar zuerst die ungerad¬ 
zahligen und dann die geradzahligen Zeilen. 

Ein Halbbild besteht aus 312,5 Zeilen. Ein ganzes Bild mit 
625 Zeilen wird also 25mal pro Sekunde erzeugt, was 25 x 
625 = 15625 Zeilen pro Sekunde entspricht. Dies ist die 
Zeilenfrequenz, die für das hohe Pfeifen verantwortlich ist, 
das man bei manchen älteren Geräten hört. 

Sollen jetzt Zeichen, oder der Einfachheit halber, senk¬ 
rechte Striche wie im Bild 1 und 2 auf den Bildschirm ge¬ 
bracht werden, so sind diese natürlich in jeder Zeile enthal¬ 
ten. Bei 100 Strichen erhöht sich die zu übertragende Fre¬ 
quenz um den Faktor 100, womit man bei zirka 1,5 MHz an¬ 
gelangt ist. Dies ist im Vergleich zur oben erwähnten Video- 



Bild 2. Bildausschnitt von einem Farbfernsehgerät mit 
Video/Audio-Anschluß 
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HARDWARE 


C64, C 128 


handbreite von 5 bis 7 MHz eigentlich nicht viel. Vergegen¬ 
wärtigt man sich aber, daß für eine saubere Bildschirmdar¬ 
stellung ein rechteckiger Spannungsverlauf notwendig ist, 
und ein Rechtecksignal sich mathematisch zusammen- 





1 V 

s 1 

Schaltspannung b. 
Wiedergabe (+12 V) 


2 

Video In 


3 

Masse 


L f'/fi 4 

Audio In 

2 ' 

5 

+ 12 V 



unbelegt 





Bild 3. Die Belegung der VCR-Buchse (am Fernsehgerät) 


setzt aus der sinusförmigen Grundfrequenz und den unge¬ 
radzahligen Vielfachen derselben, so wird das Problem 
schon deutlich: 

Klare Konturen sind wichtig 


Für eine Rechteckschwingung von 1,5 MHz müssen also 
zusätzlich übertragen werden: 4,5 MHz, 7,5 MHz, 10,5 MHz 
etc. Mit einem normalen Fernsehgerät hat man also schnell 
die Grenze seiner Leistungsfähigkeit überschritten und 
braucht sich deshalb nicht wundern, wenn es nicht gelingt, 
beispielsweise 80 Zeichen sauber auf den Bildschirm zu 
bringen. Dies schaffen wirklich nur speziell für diesen 
Zweck ausgelegte Monitore. G46R 


mit dem Sie einige wichtige Testbilder abrufen können. Mit 
dem Menüpunkt »Multiburst« können Sie zum Beispiel die 
Leistungsfähigkeit der Videostufe prüfen. Sollten Sie am 
rechten Bildschirmrand, wo die senkrechten Striche sehr 
eng aneinander liegen, nur noch buntes Flimmern oder 
Farbstreifen sehen, so ist der Verwendungszweck des Ge¬ 
rätes doch schon sehr eingeschränkt. 

Das Testbild 


Auch das Testbild aus diesem Programm (Bild 7), das dem 
der Fernsehsender nachempfunden ist, eignet sich gut, um 
die Qualität eines Monitors zu prüfen. In ihm sind einige 
wichtige Testkriterien wie Farbdarstellung, Gitterraster und 
Auflösungsvermögen vereinigt. Scheuen Sie sich also 
nicht, das Programm in ein Fachgeschäft mitzunehmen 
und mit ihm die Monitore der engeren Wahl einem Test zu 
unterziehen. 



Luminanz 
Masse 
Audio out 
Video out 
Audio in 
unbelegt 
Chrominanz 


Bild 5. Di? Belegung der Video/Audio-Buchse am C64/128 



2 Audio links 

5, 17 Masse 

6 Audio rechts 

7 Blau 

8 Schaltspannung (12 V) 

11 Grün 

15 Rot 

16 Austast-Blanking (1-3 V) 

20 Bei RGB: 

Synchronisation 
Sonst FBAS/BAS 


Bild 4. SCART-Buchse (am Fernsehgerät) 


Wollen Sie sich nicht mit Theorie belasten, sondern ei¬ 
nen Monitor oder Fernseher, der für Sie in Frage kommt, te¬ 
sten, so sei Ihnen die Programmservice-Diskette zu dieser 
Ausgabe empfohlen. Darauf befindet sich ein Programm, 


Wenn Sie den Computer vorwiegend für Spiele einset- 
zen, nur ab und zu einen Brief zu schreiben haben, und zu¬ 
dem auf die Farbenpracht, die viele Spiele heute auf den 
Bildschirm zaubern, nicht verzichten wollen, so ist die Ent¬ 
scheidung relativ einfach. In diesem Fall genügt ein norma¬ 
ler portabler Farbfernseher mit etwa 30 bis 33 cm Bilddia¬ 
gonale und Videobuchse, um den qualitätsmindernden 
Weg über das Antennenkabel zu vermeiden. 

Die Entscheidung 


Zu groß sollte das Bild nicht sein, da auch dies die Augen 
bei längeren Sitzungen am Bildschirm sehr anstrengt. 

Hat man als vorgesehene Anwendungen hauptsächlich 
Textverarbeitung und ähnliches ins Auge gefaßt, so kann 
man getrost auf Farbdarstellung verzichten, und sollte sich 
für einen monochromen Monitor entscheiden. 

Diese sind erstens erheblich billiger als Farbmonitore - 
schon ab 200 Mark findet man durchaus brauchbare Gerä¬ 
te - und bringen auch bei 80-Zeichen-Darstellung eine 
deutlich schärfere Textwiedergabe als Farbmonitore. Sie 
sollten bei einem Monitor noch darauf achten, daß ein Au- 
dioteil mit Lautsprecher eingebaut ist, da sonst für 
Sie der SID des Computers stumm bleibt. 

Wollen Sie aber die gesamten Fähigkeiten, die ihr Com¬ 
puter Ihnen bietet, sowohl bei der Farbgrafik, als auch bei 
der gestochen scharfen und ermüdungsfreien Darstellung 
von Text voll ausnützen, so sind Sie mit dem Kauf eines ei¬ 
gens für ihren Computer vorgesehenen Farbmonitors am 
besten beraten. 

Beim C64 wäre das zum Beispiel der 1802 von Commo- 
dore, der über die Video/Audio-Buchse angeschlossen 
wird. Beim C128 sind Sie mit dem 1901 oder mit dem neuen 


8 


SONDERHEFT 26 



































Direkt bestellen statt abtippen! 

Die aktuelle Diskette zum Heft: 
Programme, die jeder C64-Besitzer braucht 

Master-Address: Fastload und Hypra-Sa ve: 

Adreßvewaltung, Serienbriefe, Adreßaufkle- Mit diesem tollen Programm-Gespann 
ber und Etiketten sind die Domäne dieses können Sie Programme wesentlich schneller 
Programms. Es ist optimal auf unser Super- laden und speichern. Eine Alternative zu 
Textprogramm »Master-Text« abgestimmt und teuren Floppy-Speedern. 
bildet mit ihm ein leistungsfähiges Software- 
Paket. Game-Basic: 


v 


Mit dieser Basic-Erweiterung kann jeder tolle 
Spiele mit faszinierender örafik schreiben. 
Sprites, Soft-Scrolling und bewegte Grafik 
sind mit Game-Basic nicht länger Sache von 
Spezialisten. 


Prodisc: 

Macht Schluß mit dem Disketten-Chaos. Ein 
Super-Programm zum Verwalten Ihrer Dis- 
ketten-una Programmsammlung. Durch kom- Diskette für C64/C128 
fortable Steuerung mit Windows und Menüs ßestell-Nr 15826 
bietet es eine senr hohe Bedienungsfreund- M m A 

lichkeit. 


DM29,90 


(sFr 24,90*/öS 299r-*) 

* Unverbindliche Preisempfehlung 


Super-Copy: 

Ein Kopierprogramm gehört einfach zur 
Grundausstattung eines Computer-Fans. 


Wenn Sie Fragen zu diesen Programmen oder zu 

iDOtl 


VprunaaussTaTTung eines L-omputer-rans. anderen Angeboten aus unserem Programm-Service 

Komtortabel schnell und vor allem kompatibel haben, rufen Sie uns an: 

zu allen Commodore-Floppies ist Super- Telefon (089) 4613-640 

Copy. Ein Programm das jeder braucht! ^■ 



Markt &Techn ik 

Zeitschriften • Bücher 
_Softwore • Schulung_ 

Markt&Technik Verlag AG, Buchverlag, Hans-Pinsel-Straße 2, 8013 Haar bei München, Telefon (089) 4613-0 
Bestellungen im Ausland bitte an. SCHWEIZ: Markt&Technik Vertriebs AG, Kollerstrasse 3, CH-6300 Zug, Telefon (042) 415656 - ÖSTERREICH: Rudolf lechner & Sohn, 
Heizwerkstraße 10, A-1232 Wien, Telefon (0222) 677526 - Ueberreuter Media Verlagsges. mbH (Großhandel), laudongasse 29, A-1082 Wien, Telefon (0222) 48154.3-0;,'; 











PROGRAMMSERVICE 


Profi-Textverarbeitung für den Star NL-10 

MWrifer: Der Gewinner unseres Textverarbeitungswettbewerbs überzeugt 
durch Spaltendruck, verschiedene Zeichensätze für Bildschirm und Drucker, 
die Möglichkeit, Grafiken einzubinden, 80-Zeichendarstellung sowie eine 
universelle Erweitenjngsfähigkeit. Durch diese Eigenschaften stellt der MWri- 
ter selbst kommerzielle Software lür den C64 in den Schatten. Besitzereines 
Star NL-10 werden begeistert sein. Suburbio: Dieses Top-Listing des Monats 
ist ein Action- und GeschlckllchkeitsVStrateglespiel für den C64, das sich 
durch hervorragende Grafik auszeichnet. Ihre Aufgobe ist es, die Einwohner 
einer riesigen Stadt vor den tödlichen folgen eines Erdbebens zu bewahren: 
Sichern Sie die riesigen Höhlen unter der Stadt mit Stützpfeilern vor dem Ein- 
sturzl Master-Tool: Die vollständige Version der in zwei Teilen abgedruckten 
Spiele-Basic-Erweiterung. Das Programm erlaubt den Einsatz von Softscrol¬ 
ling, animierten Sprites, Overlay-Sprites und vielen weiteren wichtigen und 
nützlichen Funktionen. Das mitgelieferte Beispielprogramm hat die Qualitä¬ 
ten bekannter Spielhallenrenner. Zeichensätze: für Freunde des bekannten 
Desktop-Publishing-Progromms Print-Fox gibt es wieder fünf Interessante Zei- 
chensötzo auf der Diskette. 

Die Beschreibung und die Anleitung zu den Programmen finden Sie im 64'er- 
Magazin, Ausgabe 2/88, 1/88, 12/87 und 11/87. 

Diskette für C64/C 128 

Bestell-Nr. 10802 DM 29,90* sFr 24,90*/öS 299,-* 

Programme, die jeder C64-Besitzer braucht 

Master-Tool: Das Listing des Monats in Ausgabe 1/88 ist ein .Muß« für alle 
Spielefreunde und -Programmierer. Die sehr leistungsfähige Spiele-Basic- 
Erweiterung ermöglicht den Einsatz von Softscrolling, animierten Sprites, 
Overlay-Sprites und vielen weiteren wichtigen Funktionen. Das Beispielpro¬ 
gramm hierzu hat die Qualitäten bekannter Spielhallenprogramme Jahres¬ 
inhaltsverzeichnis 1987: Die komplette Übersicht aller Beiträge des Jahres 
auf Diskette Zeitaufwendiges Suchen nach Themen gehört der \fergongen- 
heit an. Hypra-Ass-Editor: Der komfortable Editor erlaubt es, Textbereiche 
zu editieren und zu löschen, zu laden, zu speichern und zu verschieben 
sowie nach oben und unten zu scrollen. Die Arbeit mit Hypro-Ass 64 wird 
dadurch noch effektiver. Hyperscreen III: Sprites im Bildschirmrahmen sind 
nun an beliebiger Position möglich. 

Die Beschreibung und die Anleitung zu den Programmen finden Sie im 64'er- 
Magazin, Ausgabe 2/88, 1/88, 12/87 und 11/87. 

Diskette für C64/C128 

Bestell-Nr. 10801 DM 29,90* sFr 24,90*/öS 299,-* 

Programme, für jeden C64-Besitzer... 

Dreher: Mit dem Usting des Monats in Ausgabe 12/87 lassen sich unter 
anderem dreidimensionale Objekte erzeugen und Konstruktionen erstellen. 
Freunden der Grafikprogtammierung läßt diese besondere Grafik-Erweite¬ 
rung das Herz höher schlagen. Tanqram: Prüfen Se Ihr räumliches Anschau- 
ungsvermögen durch dieses SpieTe-Listing. Ihre Aufgabe besteht darin, 
bestimmte Formen aus einzelnen Bruchstücken zusammenzusetzen. Printfox- 
Zeichensätze: Fünf neue Zeichensätze erweitern das Angebot der bereits 
verfügbaren Schriftarten zu Printfox. Außerdem enthält die Programmservice- 
Diskette alle übrigen Programme sowie Tips&Tricks-listings, die im Inhaltsver¬ 
zeichnis der Ausgabe mit einem Diskettensymbol versehen sind. 

Die Beschreibung und die Anleitung zu den Programmen finden Sie im 64'er- 
Magazin, Ausgabe 2/88, 1/88, 12/87 und ll/87. 

Diskette für C64/C128 

Bestell-Nr. 10712 DM 29,90* sFr 24,90*/öS 299,-* 


' Desktop Publishing... 

Layout 64: Beliebige Grafiken können in Texte eingebunden werden, wobei 
Sie schon auf dem Bildschirm sehen, was Ihnen der Drucker ousaeben wird. 
Die Verwendung verschiedener Zeichensätze, die Sie auch seitist erstellen 
können, machen dieses «Listing des Monats« zu einem sehr flexiblen und 
mächtigen Werkzeug. Packer: Der komfortable Drei-Paß-Packer erlaubt es 
Ihnen, Programme und Daten je noch Verwendungszweck in drei einzeln auf¬ 
rufbaren Verdichtungsgraden zu komprimieren. Plotter-Basic: Das beste 
listing des Druckerwettbewerbs ermöglicht es, Drucker, die das Papier vor- 
urtd zurückbewegen können, wie einen Plotter anzusprechen und zu pro- 

S minieren. Printfox-Zeichensätze: Als Zugabe finden Sie fünf einsatzfä- 
3 Zeichensätze auf der Diskette, die Sie mit dem .Printfox« sofort einsetzen 
können. Weiterhin enthält die Progrommservice-Diskette alle Programme der 
64'er-Ausgabe 11/87, die dort im Inhaltsverzeichnis mit einem Disketten¬ 
symbol gekennzeichnet sind. 

Die Beschreibung und die Anleitung zu den Programmen finden Sie im 64'er- 
Magazin, Ausgabe 2/88, 1/88, 12/87 und 11/87. 

Diskette für C64/C128 

Bestell-Nr. 10711 DM 29,90* sFr 24,90*/öS 299,-* 


Natürlich finden Sie auch in diesem Sonderheft viele Tips&Tricks. Sie finden 
beispielsweise «Hardcopy-Programmierung für jeden Drucker«, ein Pro¬ 
gramm zum Suchen und Manipulieren von Sprites auf Diskette, einen «Kurs 
zur Scroll-Progrommierung« und vieles mehr. Natürlich enthält die 
Progrommservice-Diskette auch alle Programme, die mit einem Diskettensym¬ 
bol gekennzeichnet sind. 

Diskette für C64/ C128 

Bestell-Nr. 15723 DM 29,90* sFr 24,90*/öS 299,-* 


Ihre Daten schnell und sicher im Griff 

Polydcrt: Wer mit vielen Daten, zum Beispiel Adressen, Bücher-, Software- 
und Autorenlisten oder ähnlichem arbeitet, benötigt ein leistungsfähiges und 
komfortables Doteiverwaltungsprogramm. Mit Polydat wird universelle Datei- 
verwaltung zum reinsten Vfergnügen. Hires-Master: Hires-Master ist eine der 
schnellsten Grafik-Erweiterungen für den C64. Das Basic wird um mehr als 
30 komfortable Grafik-Befehle erweitert. Ob Linien, Kreise oder mit Mustern 

S efüllte Flächen gefordert sind, Hires-Master bewältigt alles. Hires-Master 
ietet den optimalen Einstieg in die Wfelt der Grafikprogrammierung. Weiter¬ 
hin viele Tips&Tricks für den C64 und C128. 

Die Beschreibung finden Sie im Sonderheft Ausgabe 19/87 (Einsteiger). 

Bestell-Nr. 15719 DM 29,90 * sFr 24,90*/öS 299,- * 


Das Super-Textverarbeitungsprogramm 
weiter verbessert -jr 

Master-Text Version 2.0: Master-Text V2.0 ist eine überarbeitete Version des 
Master-Text-Progromms, das noch in einigen Punkten verbessert wurde. 
HABU 64: Mit diesem Programm können Sie Ihre Kontoführung überwa¬ 
chen. Es erlaubt bis zu elf unabhängige Konten mit bis zu 20 verschiedenen 
Verwendungen. Das Haushaltsbuch wird komplett durch Menüs gesteuert. 
Dabei bleibt die Bedienung durch die Verwendung komfortabler Eingabe¬ 
masken sehr einfach. Sie erfassen alle Konten auf einen Blick. Window 
Manager: Dieses Programm ist eine Basic-Erweiterung zum komfortablen 
Verwalten von Windows und Eingabemosken. Damit kann man Bildschirm- 
mosken und -Windows einfach erstellen und von Basic-Programmen aus nut¬ 
zen. Das verleiht Ihren Programmen einen professionellen Touch und erhöht 
zudem die Übersichtlichkeit. Adressen-Manager: Besitzer einer Disketten¬ 
station und eines Epson- oder kompatiblen Druckers haben jetzt gut lachen, 
Ihre Adressen können mit dem C64 fast professionell verwaltet, sortiert, aus- 
gewählt und gedruckt werde- r, . persönliches Kennwort schüzt Sie vor 
unbefugter Benutzung. Außerdem viele Tips&Tricks für den C64undC128. 
Die Beschreibungen finden Sie im Sonderheft Ausqabe 16/87 
(C64-Einsteiger). 

Diskette für C64/C128 

Bestell-Nr. 15716 


DM 29,90* sFr 24,90*/öS 299,-* 


Einmalig - Recompiler für Austrocomp 

Basic-Maker: Basic-Maker regeneriert aus jedem Kompilat, das mit den 
Austro-Compilern erzeugt wurde, ein louffähiges und editierbares Basic- 
Programm. Top-Tool: Dieses Toolkit unterstützt den Basic-Progrommierer 
durch einige sehr nützliche Befehle, wie zum Beispiel automatische Zeilennu¬ 
merierung, Variablen Dump \ferbinden von zwei Programmen, die ihm die 
Arbeit erleichtern. Berechnung periodischer Dezimalbrüche: Dieses Pro¬ 
gramm wandelt einen periodischen Dezimalbruch outomatisch in einen ech¬ 
ten Bruch um, wobei keine Ungenauigkeilen auftreten. Taxi-School: Taxi- 
School ist ein System, welches die Erstellung von Dateien mit maximal 512 
Zeilen x 24 Zeichen erlaubt. Das Besondere an diesem System ist die Mög¬ 
lichkeit die einzelnen Zeilen zu verknüpfen. XMenü: Eine Basic- 
Befehlserweiterung, die speziell zur komfortablen Programmierung von 
Menüs geschrieben wurde. Besonders hervorzuheben ist das beliebig ouf 
dem Bildschirm plazierbare Fenster mit Überschrift. Hrres-Dia-Show: 
machen Sie aus Ihren Hires-Bildern eine professionelle Dia-Show! Das 
Besondere an diesem Programm ist das weiche Ein- und Ausblenden der ein¬ 
zelnen Bilder. Froctalbergo: Apfelmönnchen sind nicht nur in der Ebene dar¬ 
stellbar. Dieses P rogromm erstellt daraus dreidimensionale Grafiken, die aus- 
sehen wie Hochhaus- oder Gebirgs-landschaften, Weiterhin viele 
Tips&Tricks für den C64 und C128. 

Die Beschreibung finden Sie im Sonderheft Ausgabe 7/86 (PEEKs& POKEs). 
Diskette für C64 

Bestell-Nr. L6 86 S7D DM 29,90 * sFr 24,90*/öS 299,-* 


Weitere interessante Programmangebote 
aus den 64'er-Sonderheften: 

Grafik- und Anwendungsprogramme der f 
Spitzenklasse 

Point Magic: Dieses professionelle Multicolor-Mal- und Zeichenprogramm 
entlockt Ihrem C64 die farbenprächtigsten Bilder. Trotzdem ist es so einfach 
zu bedienen, daß Sie von der eisten Minute an Ihre Freude an Paint Magic 
haben werden. Movie-Show: Ein Progromm, dos hochauflösende Grafik 
zum leben erweckt. Dank trickreicher Programmierung werden bis zu 99 
Hires-Grafiken im Speicher gehalten, so daß Sie beispielsweise perfekte 
Simulationen von Wellenbewegungen und anderen physikalischen Phäno¬ 
menen erzeugen können. Börse Plus: Schnell reich werden ohne zu arbeiten 
- der C64 hilft Ihnen dabei. Börse Plus, programmiert von einem Börsen¬ 
experten, ist ein vielseitiges Aktienverwaltungsprogramm. Grafische Anzeige 
der Kursveriäufe, Gewinnberechnungen, professionelle Charts und vieles 
mehr bietet Börse Plus. Als kostenlose Zugabe befinden sich die Kurse wich¬ 
tiger AGs der letzten Monate ebenfalls auf der Progrommservice-Diskette. 


Der C64 als Buchhalter und Börsen-Spekulant 

Bufueg: Dieses Buchführungsprogramm ist nicht nur für die professionelle 
Arbeit in einem Betrieb geeignet, sondern vielmehr ist es als Hilfe für den 
Anfänger auf dem Gebiet der Buchführung gedacht. Aktienmanager: Die¬ 
ses Programm ist als kommerzielles Programm zur Beobachtung, Darstellung 
und Auswertung von Aktienkursen mehrerer Unternehmen an vier verschiede¬ 
nen Börsen konzipiert worden. Es läßt sich aber auch für andere Zwecke im 
Privatbereich einsetzen. Mathefix: Mit Mathefix können fast alle Aufgaben 
aus dem Bereich der \fektorrechnung im dreidimensionalen Raum gelöst wer¬ 
den. Texlmaster: Textmaster ist ein Textverarbeitungsprogromm, das die 
Möglichkeiten des MPS 801 und MPS 803 voll ausnutzt. Randausgleich 
sowie beliebige Zeichensätze sind nur einige der hervorragenden Eigen¬ 
schaften von Textmaster. Und viele Programme für professionelle Anwendun- 

S sn auf dem C64. 

ie Beschreibung finden Sie im Sonderheft Ausgabe 7/85 (professionelle 
Anwendungsprogramme). 

2 Disketten für C64 

Bestell-Nr. L6 85 S7D DM 34,90 * sFr 29,5Q*/öS 349,-* 

Unverbindliche Preisempfehlung 



Sic suchon pockendo Spiele, 
hilfrolcho Utilities und professio¬ 
nelle Anwendungen für Ihren 
Compuler? Sie wünschen sich 
gute Softwore zu vernünftigen 
Preison? Hier finden Sie beidesl 
Unser stetig wachsendes Sorti¬ 
ment enthält interessante Listing- 
Softwaro für alle gängigen 
Compulertypen Jodes Monat 
erweitert sich unsor aktuelles 
Angebot um eine weitere inter¬ 
essante Programmsammlung für 
jeweils einon Compufortyp. 
Wenn Sie Fragen zu den Pro¬ 
grammen in unserem Angebot 
haben, rufen Sie uni ari: 

Telefon (089) 4613-640 
oder (089) 4613-133. 

Bestellungen bitte an: 

Markt STechnik Verlag AG, 
Unternehmensbereich 
Buchverlag, Hans-Pinsel- 
Straße 2. D-8013 Haar. 

Telefon (089) 4613-0. 

Schweiz: MarktÄTechnik 
Vortriebs AG, 

Kollerstrosse 3, CH-6300 Zug, 
Telefon (042) 415656. 
Österreich: Ueberreuter Media 
Handels- und Vorlagsgesell¬ 
schaft mbH (Großhandel), 
Laudongasse 29, A-1082 Wien, 
Telofon (0222) 481543-0; 
Micracomput-ique, E. Schiller, 
Fasangosse 24, A-1030 Wien, 
Telefon (0222) 785661; 
Büchorzenlrum Meidling, 
Schönbrunner Slroßo 261, 
A-1120 Wien, 

Telefon (0222) 833196. 

Bestellungen aus anderen 
Ländern bitto nur schriftlich am 
Markt ÄTechnik Verlag AG, 

Abt. Buchvortriob, Hons-Pinsel- 
Straße 2, D-8013 Haar, und 
gegon Bezahlung einer Rech¬ 
nung im voraus. 

Bitte vorwendon Sie für Ihre 
Bestellung und Überweisung die 
abgedruckto Postgiro-Zahlkarte, 
odor senden Sie uns oinon 
Vorrechnungs-Schock mit Ihrer 
Bestellung. Sio orloichtern uns 
die Auftragsabwicklung, und 
dafür borochnen wir Ihnen keine 
Vorsandkosten, 
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HARDWARE 



Bild 6. Die beiden Halbbilder der Interlace-Technik. 
Rechts der Verlauf des Pegels der Kippspannung an 
der Ablenkspule. 


Monitor 1084, der über den RGB-Eingang und den Chromi- 
nanz/Luminanz-Eingang mit dem Computer verbunden 
wird, gut beraten. (sk) 



Bild 7. Testbild mit einem Composite-Farbmonitor 


Drucker-Shopping 


Druckergibt es wie Sand am Meer. Entsprechend 
schwer fallt denn auch die Entscheidung beim 
Kauf. Hier erhalten Sie wichtige Informationen 
über Drucker, die Ihnen die Wahl erleichtern. 

D rucker gehören zum Computer wie das Salz zur Sup¬ 
pe. Was nützt die beste Textverarbeitung oderein Gra¬ 
fikprogramm, wenn die Kunstwerke dann nicht zu Pa¬ 
pier gebracht werden können. 

Vor allem für Schüler, Studenten und Auszubildende ist 
natürlich der Preis eines Druckers entscheidend. Drucker 
sind ab ungefähr 300 Mark auf dem deutschen Markt er¬ 
hältlich. Ist aber der billigste auch der beste? Überlegen Sie 
sich als erstes, wieviel Sie für Ihren Drucker ausgeben wol¬ 
len. Dann sehen Sie sich nach Geräten in dieser Preisklas¬ 
se um. Aber Vorsicht, auf dem Markt tummeln sich Unmen¬ 
gen von verschiedensten Geräten. Das Problem dabei: 
Auch Drucker arbeiten mit eigenen Programmiersprachen. 
Diese »Sprachen« veranlassen die Drucker dazu bestimm¬ 
te Textpassagen in verschiedensten Varianten zu drucken 
(Bild 1). Daneben sind die verschiedenen Befehle auch für 
den Druck von Grafiken zuständig. Nun existieren von eben 
diesen Sprachen verschiedene Versionen. Weit verbreitete 
bezeichnet man dabei als Standard. Viele Hersteller halten 
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Stützebene 


Bild 1. Verschiedene Schriftarten und -großen sind für die 
meisten Drucker kein Problem 



Führungs¬ 

plättchen 


Bild 2. Schemazeichnung eines Druckkopfes. Deutlich ist 
die Anordnung der Nadeln zu erkennen 

es allerdings nicht für nötig, sich an derartige Vorgaben zu 
halten. Sie verwenden für ihre Druckermodelle nur Teile 
daraus oder statten ihr Gerät mit völlig utopischen Befehlen 
aus. Wichtig wird der verwendete Standard in Zusammen¬ 
hang mit den verwendeten Programmen. Die meisten Pro¬ 
gramme für den C64 arbeiten mit den Commodore-eige- 
nen MPS-Druckern zusammen. Allerdings nur mit den 
nicht mehr hergestellten Modellen MPS 801 bis MPS 803. 

Die Sprache der Drucker 


Diese sind allesamt in der Lage, Grafiken und Texte auszu¬ 
drucken. Einige Nachteile müssen aber in Kauf genommen 
werden: Die Druckqualität läßt sehr zu wünschen übrig, von 
der Geschwindigkeit und der Geräuschentwicklung ganz 
zu schweigen. Außerdem sind diese Drucker nur noch über 
den Gebrauchtmarkt erhältlich, dann allerdings zu Preisen 
ab 200 Mark. Mehr als erste Gehversuche sind mit diesen 
Modellen wohl nicht möglich. Für die »kleinen« MPS- 
Drucker spricht die Tatsache, daß sie ohne Umwege per Ka¬ 
bel mit dem C64 verbunden werden. Entsprechende An¬ 
schlüsse sind vorhanden. Schwieriger wird es da schon, 
wenn man sich an den zweiten Standard heranwagt, der 
auch für größere Computer maßgeblich ist: den ESC/P- 
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Standard (Epson Standard Code for Printers). Epson ist 
denn auch der Hersteller, der als erster entsprechende Ge¬ 
räte auf den Markt gebracht hat. Viele Druckerhersteller 
halten sich an den gesetzten Standard, so daß hier auch ei- 


Aa Aa 

NUS vorgrOßort US vergrößert 

LX-800 US 500 


Bild 3. Links ein Buchstabe gedruckt mit einem 9-NadeI- 
Drucker. Rechts zum Vergleich das Ganze mit 24 Nadeln. 


ne entsprechend große Auswahl vorhanden ist. Probleme 
kann es hier mit dem Anschluß geben. Der Anschluß wird 
allgemein als Schnittstelle bezeichnet. Die Schnittstelle 
des C 64 wird als seriell bezeichnet. Daneben existiert noch 
die Centronics-Schnittstelle (siehe Kasten). Viele Drucker, 
die mit dem ESC/P-Standard arbeiten, verfügen über eine 
derartige Schnittstelle. Leider lassen sich die Geräte dann 
nicht direkt an den C64 anschließen. Dazu benötigen Sie 
ein Interface (siehe Kasten). Hier müssen Sie mit Zusatzko¬ 
sten in Höhe von 200 bis 300 Mark rechnen. Allerdings wer¬ 
den auch Drucker angeboten, deren Schnittstelle mit Hilfe 
von Modulen ausgewechselt werden kann (siehe Kasten). 

Die Matrixtechnik 


Vorteil von Druckern mit Centronics: Sie lassen sich ohne 
Probleme an größere Computer, die Ihrem C 64 vielleicht ei¬ 
nes Tages folgen werden, anschließen. Bei den bereits er¬ 
wähnten MPS-Druckern ist das nicht möglich. Alle Drucker, 
sowohl MPS als auch Epson und Epson-ähnliche, verwen¬ 
den beim Drucken die Matrixtechnik. Dabei werden winzi¬ 
ge Nadeln, auf die Zahl kommen wir noch zu sprechen, ge¬ 
gen das Papier gedrückt. Raffinierte Elektronik sorgt dafür, 
daß diese »Anschläge« einen fertigen Buchstaben bilden. 



Bild 4. Der Epson LX-800, ein preisgünstiger Drucker mit 
großer Leistung 


Gelagert sind die Nadeln im Druckkopf (Bild 2). Dieser ist 
von Drucker zu Drucker unterschiedlich geformt. Größe 
und Form sind für die Druckqualität nicht ausschlagge¬ 
bend. Vielmehr ist die Qualität von der Anzahl der Nadeln 
abhängig. Die MPS-Drucker arbeiten mit acht. Gängige 
Drucker der unteren Preisklasse verwenden zumeist neun. 

Perfekt mit 24 Nadeln 


Schwer am Kommen, zu akzeptablen Preisen, sind seit kur¬ 
zem die 24-Nadel-Drucker. Was macht nun hier den Unter¬ 
schied. Nun, der Buchstabe, der auf dem Papier erscheint, 
wird mit den Nadeln geformt. Nehmen wir an, dieser Buch¬ 
stabe ist drei Millimeter hoch. Da ist es dann schon ein Un¬ 
terschied, ob auf diesen acht, neun oder 24 Nadeln 
drucken. Die Nadelabstände bei einem 9-Nadler bewirken 



Bild 5. Kompakt, dafür etwas teuerer: Star ND-10 


beispielsweise den Eindruck, ein Buchstabe würde aus lau¬ 
ter einzelnen Punkten zusammengesetzt. Dem ist zwar so, 
doch besonders schön sieht das Ganze nicht aus. Ein Buch¬ 
stabe, gedruckt mit einem 24-Nadler, sieht da schon besser 
aus. In Bild 3 sehen Sie dafür ein vergrößertes Beispiel. 

Um Ihnen die Auswahl zu erleichtern, hat das 64’er-Ma- 
gazin die besten Modelle auf dem Markt zu Referenz-Druk- 
kern gekürt. Diese sind in drei Preisklassen aufgeteilt. 
Preisklasse eins bis 1000 Mark verteidigt seit Juli 1987 der 
Epson LX-800 (Bild 4) für 798 Mark. Ausgestattet mit neun 
Nadeln und allem Komfort kann sich die Qualität der Aus¬ 
drucke durchaus sehen lassen. In der Preisklasse zwei (bis 
1500 Mark) behauptet sich der Star ND-10 (Bild 5) mit 1295 
Mark. Bilder 6 und 7 zeigen einen Beispielausdruck von ei¬ 
ner mit dem C64 erstellten Grafik. Die Grafikqualität dürfte 
auf beiden Druckern in etwa die gleiche sein. Bild 1 zeigt 
Schriftproben der beiden Referenzdrucker (links LX-800). 
24-Nadel-Drucker sind zwar derzeit hochaktuell, die An¬ 
steuerung über den C64 erweist sich jedoch als äußerst 
problematisch. Wer sich in nächster Zeit einen Drucker an- 
schaffen will, ist mit einem der beiden Referenzen bestens 
bedient. Trotzdem sollten Sie sich nicht scheuen, ausführli¬ 
che Beratung beim Fachhändler in Anspruch zu nehmen. 
Bei der Hektik des Marktes kann schon morgen ein Drucker 
auf dem Markt sein, der viel besser und viel billiger als alles 
bisher Dagewesene ist. (rf) 
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Interface 


Schnittstellen-Module 


Bild 7. Grafiken Sind für Referenzdrucker kein Problem, 
wenn sie durch die Software richtig angesteuert werden 


Mir» rtnr kleine DrmcMV.tr nt inn rirr nrurn bA'rt 
IV intf om Driirkroutinr. Du* obere Halft* *>«•». Bilde» wurde mit 
clrm nriom«l-Oruik*»trrltM<r in Miyti-Uu.ihty zu P«i* ijrlir-rht, 
■tir «eifere eben#*11* In High’OlMllfy - mit imerem neuen 

trritirr »PfOX*«. Btt Uefertchird i*t nicht ru «kmtkni 

Schwärzer geht's nicht! 

für Brsitwr w. 5t.»r Hl. JO wurde 
«Uftktxlich noch »m kleine* Bonbon 
eingebaut: Her neu* Treiber l.illt nun 
aucIi in Ijjw üuohtv nnrti Aufdruck in 
voller f'.iptrrhrritr su 1 

Warnunq: Mit diesem Drucker 
trcaber leidet Ihr Karbbdnri. Dafür 
laßt das Ergobruu garantiert keine 
Wunsche mehr uffen. 

Hl*r eine klein* Deteonmtretion der neuen 44’ee- 
PrlntfOK-Druckroutln*. Dl# obere Halft# de« Bildes wurde mit 
d#m Original-DrucV#»tr#Jb#r in High-Qjality zu Papier gebracht, 
di# ir»t#r# - eben» all» in Migh-Ouality - mH un«#r#m neuen 
Treiber »PfQX*«. Orr U*t#rsckl#d Ist nicht tu Uh#fs*h#ni 

Schwärzer geht's nicht! 

Pur Besitzer eines Star HL-IO wurde 
zusätzlich noch ein kleines Bonbon 
eingebaut! Der neue Treiber Uflt nun 
auch in Low-Quality einen Ausdruck in 
voller Papier breite zu' 

Warnung: Mil diesem Drucker¬ 
treiber leidet Ihr Farbband. Dafür 
laßt das Ergebnis garantiert keine 
Wjnsche nrahr offen. 


Bild 6. Erstellt wurde dieses Bild mit einem Grafik- 
Programm und dann per Drucker zu Papier gebracht. 


Schnittstellen 


Um beispielsweise ein Diskettenlaufwerk oder einen Drucker an 
den C64 anzuschließen, muß ein entsprechender Ausgang am 
Computer vorhanden sein. Dieser existiert beim C64 in Form der 
seriellen Buchse. Neben der seriellen gibt es noch diverse andere 
Normen, unter anderem auch die Centronics, die bei vielen 
Druckern Verwendung findet. 


Um einen Drucker mit Centronics-Schnittstelle an die serielle 
Buchse des C64 anschließen zu können, müssen die Daten in ein 
für den Drucker verständliches Format gebracht werden. Dafür 
sorgt ein kleines Kästchen, das Interface. Es besitzt einen Stecker 
für den C64 und einen für den Drucker. Für Datenumwandlung 
sorgt entsprechende Elektronik. 


Manche Druckermodelle verwenden anstelle eines Interface Ein- 
schubmodule. Je nach Art der Schnittstelle Ihres Computers sind 
entsprechende Module mit passenden Schnittstellen vorhanden. 
Wird ein neuer Rechner angeschafft, lassen sich die Module ohne 
Probleme austauschen. Man spart die Kosten für ein Interface. 


C 64, C 128 HARDWARE 



SONDERHEFT 26 






























GRUNDLAGEN 


C64 



Bild 1. Bernd von Prondzinki - »Marylin« 



Bild 2. Henning Kienne - »Pharao« 




»Der C64 ist ein leistungsfähiger Grafik-Computer und 
erfreut sich einer stetig steigenden Beliebtheit«, stellten wir 
im 64'er-Magazin Ausgabe 5/87 fest. Im November 1986 
schrieben wir einen Multicolor-Wettbewerb aus. Es erreich¬ 
ten uns unzählige Einsendungen. Die Künstler hatten Un¬ 
geheures geleistet und uns die Auswahl sehr schwer ge¬ 
macht, so daß wir unsere Leser aufriefen, bei der Entschei¬ 
dung zu helfen. 

Betrachten Sie die Bilder 1 bis 10. Sie geben einen Über¬ 
blick der Einsendungen. Sie beweisen, daß der C64 in Sa¬ 
chen Grafik einiges zu bieten hat. Die Faszination der Grafi¬ 
ken erreicht der C 64 durch seine Farbfähigkeiten. Im Multi- 
color-Modus stehen dem Benutzer alle 16 Farben für ein 
Bild zur Verfügung. Grenzen sind so nur noch durch die ei¬ 
gene Kreativität gesetzt. Zahlreiche Malprogramme für den 
C64 erleichtern die Gestaltung der Bilder, Programmier¬ 
kenntnisse sind dabei nicht erforderlich. 

Von ganz besonderer Faszination sind sogenannte »Ap¬ 
felmännchen«, auch bekannt unter dem Begriff Fractals 
(Bild 11 und 12, Seite 17). Im weiten Sinne umschreibt man 
mit diesen Begriffen Gebilde mit unendlich fein gewunde- 



Bild 4. Friedrich Häckel - »Diabolo« 



Bild 3. Martin Quedzuweit - »Eisvogel« 


Bild 5. Peter Trost - »Amalienburg« 
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GRUNDLAGEN 



nen und zerklüfteten Grenzen und Oberflächen. Fractals 
lassen sich auch auf dem Computer darstellen. 

Die Umsetzung auf dem C 64 ist im Prinzip recht einfach: 
Vorgegeben ist das Bildungsgesetz, eine komplexe Funk¬ 
tion. Mit einigen veränderbaren Parametern, die vor dem 
Programmstart einzugeben sind, errechnet der Computer 
die Grafik. Das Resultat ist wirklich verblüffend: es entste¬ 
hen immer neue Fantasie-Landschaften. 

Grafiken müssen für Sie kein Buch mit sieben Siegeln 
bleiben. Schließlich haben Sie einen grafisch sehr lei¬ 
stungsfähigen Computer im Haus. Wir lassen Sie natürlich 
nicht alleine und greifen Ihnen unter die Arme. Im 
64'er-Sonderheft 23 ist ein professionelles Multicolor-Mal- 
programm der Spitzenklasse enthalten. Im 64’er-Magazin 
finden Sie regelmäßig Kurse zur Grafik-Programmierung 
und jede Menge Tips und Tricks. Ganz besondere Lecker¬ 
bissen bieten unsere »Best of Grafik«-Sammlungen Volu¬ 
me 1 bis 3. Diese Disketten enthalten unter anderem unsere 
Spitzenreiter »Hi-Eddi +« und »Giga-Cad«. Doch Vorsicht! 
So mancher ist von der Computer-Grafik so fasziniert wor¬ 
den, daß er nicht mehr davon loskam. (ad) 



Bild 6. Armin Nickel - »Butterfly« 



Bild 7. Frank Nilles - »Porsche 944« 



Bild 8. Stephan Greiwe - »Astronaut« 



Bild 9. Palsh Flohr - »Dwarfland« 



Bild 10. Kay Melchinger - »Saturn« 
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Bild 11. Sehr unterschiedliche Strukturen weist dieses 
Fractal auf. Die Ränder sind sehr fein zerklüftet. 



Bild 12. Durch Zufall entstand ein Clowngesicht. Das 
Gesicht erscheint in verschiedenen Größen immer wieder. 


Datenfernübertragung: 
das Tor zur Welt 


Mit dem C64 auf Entdeckungsreise gehen: in 
fremden Mailboxen stöbern, mit dem Freund in 
Amerika ein Spielchen spielen, oder einfach 
neueste Informationen abfragen. Wie das funk¬ 
tioniert und welche Möglichkeiten sich auftun, er¬ 
fahren Sie hier. 

S eltsame Gerätschaften und ein beträchtliches Kabel¬ 
wirrwarr fallen ins Auge, betritt man zu nächtlicher 
Stunde Harrys Zimmer. Vor dem Bildschirm seines 
C 64 sitzend, kommuniziert er mit weit entfernten Compu¬ 
tern, tauscht Daten aus, holt sich neueste Informationen al¬ 
ler Art und wagt auch mal ein Spielchen mit einem Gegner, 
der Kilometer entfernt versucht, Harry zu schlagen. Diese 
Aktivitäten haben in der Sprache der Computerfreaks die 
Bezeichnung DFÜ (Datenfernübertragung). Ohne den hei¬ 
mischen Telefonapparat wäre er ziemlich aufgeschmissen. 
Harry erklärt: »Die Daten von und zu dem anderen Compu¬ 
ter werden über das normale Fernsprechnetz übertragen.« 
Jedermann habe so die Chance, an der »Datenfernübertra¬ 
gung« (DFU) teilzunehmen. 

Nach einer spannenden Nacht verlassen wir bei Tages¬ 
anbruch begeistert unseren Hacker Harry. Gedanken wie 
»das muß ich auch mal ausprobieren« schwirren uns durch 
den Kopf. Ganz klar,, das müssen wir auch haben. Doch der 
Einstieg in die »DFÜ« stellt uns vor unerwartete Probleme: 
Am nächsten Morgen im Computer-Laden berieseln uns 
Verkäufer mit technischen Ausdrücken wie »Bit pro Sekun¬ 
de« und »Übertragungssicherheit«. So besuchen wir Harry 
noch an diesem Vormittag erneut. 





Daten übers Telefon 





Dieser zeigt sich unseren Problemen gegenüber aufge¬ 
schlossen und weist uns in die faszinierende Welt der DFÜ 
ein. Über das normale Telefonnetz können wir Verbindun¬ 
gen mit Computern auf dem ganzen Erdball hersteilen, In¬ 
formationen und Daten austauschen und uns mit einem 
Partner unterhalten. Auf unseren Einwand, dies ginge doch 
auch ohne Computer, entgegnet Harry: »Ja, aber denk 


doch nur an folgende Situation: Du wohnst im Süden 
Deutschlands und telefonierst mit Deinem Freund hoch im 
Norden. Er ist ebenfalls Computerfreak und hat gerade ein 
tolles Programm geschrieben, das Du unbedingt haben 
willst. Normalerweise müßte er es Dir per Post schicken. 
Das dauert einige Zeit und ist bei Disketten nie sicher, oft 
kommen sie beschädigt an. Doch Ihr seid ja beide DFÜ- 
Ar"»«;nder: Ihr legt also Eure Telefonhörer auf die Akustik¬ 
koppler, und wenige Minuten später ist das Programm in 
Deinen Computer übertragen.« 



Bild 1. Unentbehrlich zur DFÜ: Ein Akustikkoppler 


Harry lehnt sich zurück und fährt fort: »Das Anwählen von 
sogenannten ’mailboxen’, eine Art elektronischer Briefka¬ 
sten für jedermann, ist ebenfalls per DFÜ möglich. Wie in 
einem echten Briefkasten liegen dort Briefe mit Nachrich¬ 
ten aller Art bereit, die man über seinen Computer abruft.« 

Wir unterbrechen Harry. Denn was ist bitte ein »Akustik¬ 
koppler«? Und wie werden überhaupt Computerdaten ins 
Telefonnetz geschickt? Harry hat Verständnis für unseren 
Einwand: »Du kennst doch sicher das Morsen. Aus einzel¬ 
nen Buchstaben zusammengesetzte Nachrichten werden 
hier durch lange und kurze Tonsignale verschlüsselt per 
Funk übertragen und schließlich wieder in Buchstaben um¬ 
gewandelt. So ähnlich funktioniert die DFÜ. Das Verschlüs- 



SONDERHEFT 26 



















GRUNDLAGEN 


C64, C 128 


sein übernimmt hier ein Gerät, der Akustikkoppler (Bild 1). 
Er setzt die aus dem Computer kommenden elektrischen 
Impulse in Schallwellen um. Diese werden über das Telefon 
gesendet. Auf der Empfangsseite steht ebenfalls ein Aku¬ 
stikkoppler, der aus den ankommenden Schallwellen wie- 



Bild 2. Ein Modem zum Anschluß an das Fernsprechnetz 


der elektrische Signale macht. Der Empfangs-Computer 
weiß diese Signale zu interpretieren und zeigt so die ent¬ 
sprechenden Buchstaben auf dem Bildschirm an. Auf die¬ 
se Weise lassen sich dann natürlich auch komplette Texte 
übertragen. 

»Toll«, entgegnen wir, »aber das muß ja wahnsinnig kom¬ 
pliziert sein. Woher wissen denn die zwei Computer, was 
die Signale bedeuten?« 

Standardisierte Übertragung 


Harry kann uns beruhigen: »Du brauchst auch nicht im ein¬ 
zelnen zu wissen, wie die Daten übertragen werden. Des¬ 
halb hält man sich hier an bestimmte Richtlinien zur Über- 



Bild 3. Der User-Port des C64. Hier wird das Interface zu 
einem Modem oder Akustikkoppler angeschlossen. 


tragung. Alle Computer verwenden intern Code-Zahlen, 
um Zeichen, Buchstaben und Zahlen im Speicher darzu¬ 
stellen. Diese Codes müssen einer Norm entsprechen, so 
daß Daten auch mit anderen Computern ausgetauscht wer¬ 
den können. So eine Norm ist der »ASCII«-Code (American 
Standard Code for Information Interchange). Doch auch die 
Übertragungsgeschwindigkeit der Daten ist wichtig. Bei 
beiden Geräten muß sie gleich sein. Man spricht hier auch 
von der Übertragungsrate. Sie wird in bps (Bit pro Sekunde) 
angegeben. Eine Übertragungsrate von 300 bps bedeutet 
also, daß der Computer in einer Sekunde 300 Bit Daten 
überträgt. Je höher diese Rate ist, desto schneller erfolgt 


die Datenübertragung. Ein Byte besteht dabei entweder 
aus 8, oder aus 7 Bit, abhängig von der jeweiligen Einstel¬ 
lung des Programms und den Fähigkeiten des Modems. 

Direkte DFÜ per Modem 


Zwischen zwei zu übertragenden Bytes schickt der Com¬ 
puter zusätzlich ein oder zwei »Stop-Bits«. Daran erkennt 
der empfangende Computer das Ende eines Bytes. Eine 
weitere Einrichtung hilft dem Computer, Übertragungsfeh¬ 
ler zu erkennen. Dazu werden die Daten zu einer Prüfsum¬ 
me verknüpft, deren Wert entweder gerade (even Parity) 
oder ungerade (odd Parity) ist. Geschickt wird also nur eine 
Information, ob die Prüfsumme gerade oder ungerade ist 
(Parität). Anhand der Parität überprüft der empfangende 
Computer nun, ob das gesandte Byte gleich dem empfan¬ 
genen Byte war. Entspricht das empfangene Byte nicht 
dem gesandten, ist ein Übertragungsfehler aufgetreten. 
Diese Überprüfung wird allerdings selten angewendet, 
meist bleibt die Parität vollständig ausgeschaltet. Fehler 
treten recht selten auf.« Harry resümiert: »Und nur wenn 
Sender und Empfänger die gleichen Parameter eingestellt 
haben, funktioniert die Übertragung.« 

Harry versichert uns: »Dieses Fachchinesisch wird Dir 
bald in Fleisch und Blut übergehen. Außerdem erleichtern 
Programme das Einstellen der Parameter. Neben dieser 
Aufgabe erledigen sie die Darstellung der Buchstaben auf 
dem Bildschirm. Man nennt sie Terminalprogramme. Ohne 
Terminalprogramm kannst du keine DFÜ betreiben.« 

Harry möchte uns als nächstes in eine Mailbox entfüh¬ 
ren. Gespannt warten wir auf diesen Augenblick, unsere 
Augen suchen nach dem Akustikkoppler. Doch neben dem 
Telefon befindet sich nichts dergleichen. Harry lädt ledig¬ 
lich sein rerminalprogramm, startet es und scheint zum 
Einsatz bereit. Auf unser verwundertes Fragen entgegnet 
Harry: »Ich verwende statt einem Akustikkoppler ein soge¬ 
nanntes »Modem«, dieses Kästchen hier (Bild 2). Es ist di¬ 
rekt mit dem Telefonnetz verbunden, der Ümweg über den 
Hörer entfällt. Dadurch wird die Übertragung sicherer. Un¬ 
empfindlichkeit gegenüber Störgeräuschen von außen 
sprechen ebenfalls für ein Modem. Momentan sind 'legale' 
Modems allerdings nur von der Bundespost erhältlich. Im 
Laufe des Jahres 1988 sollen auch Geräte von Fremdan¬ 
bietern zugelassen werden, die wesentlich preiswerter er¬ 
hältlich sind.« Doch nun wenden wir uns der Mailbox zu. 
Hier gebe es einige interessante Funktionen, meint Harry. 
An einer Art Pinwand sind Infos und Fragen für die Öffent¬ 
lichkeit abrufbereit. Hier findet man neben Verkaufsange¬ 
boten auch Veranstaltungstips und zum Beispiel Antworten 
auf vorher gestellte Fragen. 

Abenteuer Mailbox 


Weiterhin beinhaltet eine Mailbox persönliche Briefkästen, 
die nur einer Person zugänglich sind. Hier kann man Briefe 
(Mails) über den Computer »einwerfen«. 

Eine Mailbox wird per Telefon angerufen, und falls mo¬ 
mentan nicht besetzt ist, ertönt ein Pfeifsignal, der soge¬ 
nannte »Carrier«. Jetzt müssen wir den Hörer in die Muffen 
des Akustikkopplers klemmen, und der Spaß kann losge¬ 
hen. Harry wählt die Nummer 089/8120338 der Münchner 
ACM-Box. Harry erklärt uns die nun folgende Prozedur: 
»Ich muß mich jetzt in die Box ’einloggen’, das heißt ich muß 
mich der Box gegenüber zu erkennen geben. Dazu würde 
ich normalerweise meinen Namen und ein Paßwort einge¬ 
ben, da ich in dieser Box bereits als »User« (Benutzer) ein¬ 
getragen bin. So kann ich auf alle Funktionen der Box zu- 
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C64, C 128 


greifen. Wer »nur mal reinschnuppern« möchte, gibt als Na¬ 
me »Gast« ein. Nun erscheint das Grußwort des »Sysops«, 
wie der Systemoperator (Mailbox-Betreiber) in der Kurz¬ 
form heißt. Er wacht über den Inhalt der Box und sitzt 
manchmal selbst am Computer. Du kannst ihn dann in 
wichtigen Fällen rufen und Dich direkt mit ihm über die Ta¬ 
statur unterhalten. 



Bild 4. Unbedingt notwendig: ein Terminalprogramm 

Nach dem Einloggen wählt Harry über Zahlen verschie¬ 
dene Menüs aus. Mit »00« gelangt man bei der ACM-Box 
ins Hauptmenü. Von dort aus sind verschiedene Unterme¬ 
nüs ebenfalls durch Zahlen zu erreichen. 

»Bei jeder Mailbox gibt es einige Funktionen«, erläutert 
Harry, »die den grundsätzlichen Umgang mit der Box be¬ 
treffen. Sie werden über Kombinationen mit der Control- 
Taste bedient und sind weitgehend standardisiert: <CTRL 
S> hält die Übertragung an, <CTRLQ> nimmt die Über¬ 
tragung wieder auf, <CTRLC> überspringt Menü-Unter¬ 
punkte, und <CTRL X> verläßt das aktuelle Menü.« 

Für das nächste Treffen verspricht uns Harry einen Aus¬ 
flug in eine amerikanische Mailbox. In Amerika wird DFÜ 
viel intensiver genutzt als bei uns: Dort sind Börsenkurse in 
Mailboxen verfügbar, man verschickt Telexe und bestellt 
Waren per Computer. »Letzteres ist bei uns auch über Bild¬ 
schirmtext (Btx) möglich«, ergänzt Harry. 


Uns fällt dagegen ein, daß Harry zu Beginn unserer Sit¬ 
zung mit einem Spiel beschäftigt war. Geschah dies etwa 
auch per DFÜ? Harry erklärt: »In manchen Mailboxen gibt 
es auch Spiele, meist Adventures. Raffinierte Systeme er¬ 
möglichen sogar das Spielen mehrerer Leute gleichzeitig.« 

Ein kurzer Blick auf Harrys Uhr bestätigte vage Vermu¬ 
tungen: Wir saßen bereits mehrere Stunden vor Harrys 
C64. Die DFÜ-Sucht hat weitere Opfer gefunden. 

Harry erhebt sich, und auch wir wagen ein paar Schritte 
an der frischen Luft. Harry entführt uns dabei geschickt in 
den Computerladen vom Vormittag. Wir sind jetzt natürlich 
vollkommen der DFÜ verfallen, greifen nach dem nächst¬ 
besten Akustikkoppler, der für 270 Mark angeboten wird, 
und begeben uns in Richtung Kasse. Doch Harry warnt: 
»Akustikkoppler und Modems werden normalerweise über 
eine RS232-Schnittstelle angeschlossen, die es beim C64 
allerdings nicht gibt. Trotzdem ist mit ihm ja DFÜ möglich, 
wie Du vorhin gesehen hast. Man schließt die DFÜ-Geräte 
deshalb an den User-Port des C64 oder C128 an (Bild 3). 
Dazu ist ein Interface nötig, das die Signalumwandlungen 
vornimmt. Es kostet rund 60 Mark.« 

Zufrieden wollen wir Koppler und Kabel bezahlen, da er¬ 
scheint ein Verkäufer und weist uns auf ein neues Terminal¬ 
programm hin. Denn zum Betreiben der DFÜ ist gute Soft¬ 
ware (Bild 4) Voraussetzung. Außer den Standardfunktio¬ 
nen wie Parametereinstellung und Übertragungs- (Oniine)- 
Modus sollte sie Funktionen wie das automatische Mitpro¬ 
tokollieren der Daten bieten, wobei das Protokoll dann ge¬ 
speichert und gedruckt werden kann. Neben käuflichen 
Programmen sind für den C64 Public Domain-Programme 
erhältlich, die man frei kopieren darf. Harry rät uns deshalb, 
mit der Kaufentscheidung für die Software zu warten. Wir 
bezahlen und verlassen den Laden. 

Auf dem Heimweg fällt uns ein: »Ohne Software ist DFÜ 
unmöglich!«. Harry lächelt verschmitzt: »Weiß ich doch, 
aber ich arbeite schon seit Jahren mit Public Domain-Soft¬ 
ware. Du kriegst von mir selbstverständlich eine Kopie.« 

Falls Harry nicht in Ihrer Nähe wohnen sollte, verweisen 
wir Sie auf das 64’er-Listing »Proterm V6.0« aus Ausgabe 
4/87 (siehe auch Bild 4). 

(Axel Pretzsch/Thomas Linke/ad/pd) 


10 REM ******************************** 


20 REM * MINITERM * 
30 REM * * 
40 REM * EIN PROGRAMM ZUM * 
50 REM * AUSPROBIEREN VON * 
60 REM * MAILBOXEN * 
70 REM * * 


80 REM ******************************** 

85 : 

90 REM EINGABE DER PARAMETER 
95 : 

100 INPUT"DATENBITS (8/7XSPACE,2RIGHTD8C4 
LEFT, SPACE} ’’ i DB 

110 INPUT"PARITY (N/E/O)CSPACE,2RIGHTDNC4L 
EFT,SPACE}";PAS 

120 INPUT"STOP-BITS <1/2)CSPACE,2RIGHT}1C4 
LEFT,SPACE}"; SB 
125 : 

130 REM PARAMETER SETZEN 
135 : 

140 SR=6+(SB-1 >*2t7+ABS(DB-8)*2t , 5 
150 BR=ABS(PASO"N">*2t5+ABS(PA$<>"0"AND P 
AS<>"N">*2t6 
155 : 

160 REM KANAL OEFFNEN 
165 : 

170 OPEN 2,2,3,CHRS(SR)+CHRS(BR) 


<060> 

< 010 > 

<079> 

<098> 

<082> 

< 211 > 

<119> 

<130> 

<061> 

< 111 > 

<071> 

<137> 

<077> 

<084> 

< 101 > 

<042> 

< 111 > 

<125> 

<230> 

<131> 

<206> 

<141> 

< 111 > 


175 GOSUB 1000 <13l> 
180 GET«2,AS:PRINT"CCLR}ONLINE ..." <137> 
485 = <207> 
490 REM SENDEN UND EMPFANGEN DER DATEN <074> 
495 : <217> 
500 GET B$:IF B$<>""THEN PRINT82,CHR$(T%(A 

SC(B$+CHRS<0>>>>; <041> 
510 GET82.CS <041> 
520 PRINT CHR$(F%(ASC(C$+CHRS(0>))); <122> 
530 GOTO 500 <238> 
985 : <199> 
990 : REM STANDARD-ASCII HERSTELLEN <245> 
995 : <209> 
1000 DIM FX(255),T%(255) <148> 
1010 FOR J=32 TO 64:T%(J)=J:NEXT <166> 
1020 T%(13)=13:T%(20)=8 <078> 
1030 FOR J=65 TO 90:K=J+32=T%<J>=K:NEXT <223> 
1040 FOR J=91 TO 95:T%< J)=J:NEXT <076> 
1050 FOR J=193 TO 218:K=J-128:T%(J)=K:NEXT <239> 
1055 T%(24>=24:T%(19 > = 19:T%(3)=3 <165> 
1060 T%(17)=17:T%(146)=16:T%(133>=16 <009> 
1070 FOR J=0 TO 255:K=T%(J) <144> 
1080 IF K<>0 THEN F%(K)=J=F%(K+128)=J <242> 
1090 NEXT <084> 
1110 RETURN <152> 


© 64'er 


Listing 1. »Miniterm«, ein Programm für Ihre ersten Schritte in der DFÜ. Bitte mit dem Checksummer eingeben 
(beachten Sie hierbei die Eingabehinweise auf Seite 158) und mit RUN starten. 
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Ab sofort kommen alle Besitzer eines C64 und C128 in den Genuß 
unschlagbarer Software. Mit unserer neuen Produkt-Reihe 64'er-EXTRA 
erhalten Sie brandaktuelle Top-Programme zu den beliebtesten 
Themen: Super-Spiele, Tools, Anwendungen sowie Best-of-Pakete. 
Mit jedem Software-Paket wird ein Bedienungshandbuch für alle 
Programme mitgeliefert. Sie erhalten so das beste und interessanteste 
Werkzeug für Ihren Computer und können es sofort einsetzen. 



Best of Grafik Vol. 1 

Giga-CAD Unschlagbare 3 D-Konstruktion auf dem C 64 • Hi-Eddi 
Das Super-Zeichen- und Malprogramm • Titlo Wizard Giga-CAD- 
Filmo für eigene Vforspänne • Pic-Loader Verwenden Sie Hi-Eddi- 
Grafiken für eigene Programme • Hi-Maus Maus-Treiber für 
Hi-Eddi • Hi-Spiegol Spiegeln Sie beliebige Ausschnitte einer Grafik • 
Filmconvorter Giga-Cod-Filme können mit diesem Programm in das 
Hi-Eddi-Format umgewandelt werden • Drdckeranpassungen für 
Hi-Eddi: Printer/Plotter VC 1520, MPS-001/802/803, Seikosho GP 
700VC, StorNL-10, Commodore-Plotter VC 1520, C.ltoh-8510, 
C.ltoh RitemanC+ 

I Programmdiskette für C 64/C 128 

I Demonstrotlonsdiskette für Giga-CAD aa* 

Bestell-Nr. 38701 sFr 44,$0*/öS 499,-* DM 49,90 * 



Best of Grafik Vol. 2 

Grafik 2000 43 neue Grofikbefehle für Ihren C 64 • Provic 64 
32 Sprites gleichzeitig auf dem Bildschirm • Grafic-Calc Professionelle 
Business-Grafik - vom Säulen- zum^Kuchendiagramm • 3D-Grafik- 
Master Drehen dreidimensionaler Körper in Echtzeit • MPS-Support 
Profi-Auflösung für MPS-Drucker • Epson-Support Grafik-Befehls- 
erweiterung für Ihren Drucker • Scroll-Machine Ruckfreie Scroll- 
Routine zum Einbinden in eigene Spielo • Pseudo-ScrollE ine Routine, 
mit der Sie Bewegung ins Spiel bringen • Fractal-Berge Bizarre Land¬ 
schaften aus dem Computer. Grafik-Wandlör Rechnet Hires- 
Graflken In Loies-Bilder um • Lore s zu Hirn Transportiert Textblld- 
schirme in hochauflösende Grafik • Pic-Loader Grafikdieb für Prints¬ 
hop und Printmaster • Hardmaker Roubt und druckt Zeichensätze und 
Hlres-Grafiken aus professionellen Programmen . Hardcopy- 
Routinen Super-Tnsiber für MPS 801, Epson, VC 1520 uncfCP-80X 
I Diskette für C 64/C 128 Ä 

Bestell-Nr. 38702 sFr 34,90*/öS 399,-* DM 39,90 * 



Best of Grafik Vol. 3 

Hires-Masior Die wohl schnellste Grafikerweiterung • Sprite + 
Grafik-Basic Mehr als 100 neue Befehle für Ihren C64 • 3D-Schoch- 
Gra/rA-Tolle Befehle zur Schachprogrommierung • IRQ-Basic Grafik 
und Musik im Interrupt • Game-Basic Neue Befehle zur Programmie¬ 
rung von Spielen • Kudi 64 Mathematische Funktionen grafisch dar¬ 
gestellt • Shapes 64 Bringen Sie Bewegung ins Bild • Apfelmännchen 
Bilder ous einer anderen Dimension ■ 3D-Movio-Maker Trickfilme in 
der vierten Dimension • Chartset-Master Zeichensatzgenerator mit 
über 100 Befehlen • Graphic-Art Editor als Antwort auf das Sprife- 
Problem - Super-Hardcopy Unschlagbare Druckqualität für Epson- 
Drucker • Epson-Plotter Matrixdrucker simuliert Plotter • Hardcopy- 
Programme für Epson-Drucker, Star SG-10, MPS 801/802/803 
I Diskette für C 64/C 128 * 

Bestell-Nr. 38703 sFr 34,90*/öS 399,-* DM 39,90 


Jetzt lieferbar: 

Adventure-Pack Vol. 1 

Robox 

Fesselndes Grafik-Science-Fic«ion-Ad venture 
Der Horrschor eines fremden Planeten ließ sein Gehirn nach seinem 
Tod künstlich weiterleben - in einem Körper ohne Seele. Aus dieser 
Kombination, holb Roboter und halb Mensch, halb lebend und halb 
tot, die Robox genannt wurde, enstand der Haß auf alles lebende. Er 
befahl daher solner Roboter-Armee, sämtliches loben des Universums 
zu vernichten. Ihre Aufgobe ist es, zu Robox zu gelangen und ihn 
unschädlich zu machen, um die Erde vor ihrem sonst sicheren Tod zu 
bewahren. Wie Sie dies tun, bleibt Ihnen überlassen. 

Scotland Yard 
Spannendes Kriminal-Adventure 

Begebon Sio sich auf spannende Vferbrecherjogd In das London des 
19 Jahrhunderts, und lassen Sie sich engagieren bei Scotland Yard. 
\ferhören Sie Tatverdächtige, prüfen Sie deren Alibis und verfolgen Sie 
die Spuren zurück zum Täter. Als Belohnung für die lösung der zehn 
ungeklärten Fälle wartet Ihre Beförderung zum Oberinspektor. 

Mil dem mitgalieforten Fall-Editor konstruieren Sio weitere Verbrechen 
und geben damit Ihren Freunden harte Nüsse zu knacken. 

3 Disketten (beidseitig bespielt) für den C 64/C 128 

Bestell-Nr. 38704 sFr 24,90*/öS 299,-* DM 29,90* 

"Unverbindliche Preisempfehlung 


§ 


The Best of Floppy Tools Volume 1 

Lieferumfana: Anleitungsheft • S'A'-Dlskette (1541-Format) 
Disc-Wizard Directory-Sort, Diskmonitor, Text-Seorch u.v.m. • Copy + 
Parallel-Backup-Kopierprogromm • Super-Copy Komfortables File- 
Kopierprogramm • ihirty Seconds Blitzschnelles Bockup- 
Kopiorproaramm für CI 28 • FMON 1541 leistungsfähiger Floppv- 
Monitor • Disk-Monitor kurzer Disk-Monitor für C64 • Ultraload / - 
bool Plus Software-Speeder und Autostart-Generotor für Schnellader • 
EX-SMON-DOS brennföhiae EPROM-Version des Betriebssystems ■ 
Datawork Basic Komfortable Befehlserweiterung für Floppy- und 
Dateizugriffe • Disk-Manager Varwaltet bis zu 6500 Programme • 
CP/M <-> CBM Einfacher Datenaustausch zwischen CP/M- und 
1541-Format • sowie weitere Super-Utilitles 
Hardware-Voraussetzung: C 64/C128, Floppy 1541/1570/1571 
Bestell-Nr. 38706 sFr 44,-*/öS 490 - DM 49 r* 



Markt&Technik 


Zeitschriften • Bücher 
Software • Schulung 


The Best of Floppy Tools Volume 2 

Lieferumfang: Anleitungsheft • S'/a"-Diskette (1541-Format) 

ProDisc Komfortable Disketterrvorwaltung in Assembler • Master-Copy 
Backup-Kopierprogramm Dual-Filocopy Filo-Kopiorprogramm für 
zwei Laufwerke Trackcopy Einfaches Kopieren und Formatieren von 
einzelnen Tracks • Tornado-Copy Schnelles Backup-Programm für ein¬ 
seitig bosplolte Disketten • Disk Mon 64 Professioneller Noppy- und 
Diskettenmonitor - Hypro-toad/SoveSoftware-Spoedor für C 64 - 

Hypra-Perfekt Hypra-LOAD/SAVE eingebunden ins Betriebssystem • 
EXOS V3 Leistungsfähiges Betriebssystem für den C64 - Disk- 
Soarcher Findet sehr schnell beliebige Zeichenketten auf Diskette - 
Filo-Managor Befehlserweiterung zur Verwaltung von Disketten • 
Super-Aulostart Autostart-Generotor mit Vsrschlüsselungs-Routine • 
sowie weitere Super-Utilities 

Hardwaro-Voraussotzung: C64/C128, Floppy 1541 /1570/1571 
Bestell-Nr. 38707 sFr 44,-*/öS 490, DM 49,-* 



K Markt&Technik Verlag AG, Buchverlag, Hans-Pinsel-Straße 2, 8013 Haar bei München, Telefon (089) 4613-0 
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Heizwerkstraße 10, A-1232 Wien, Telefon (0222) 677526 • Ueberreuter Media Veriagsges. mbH (Großhandel), laudongasse 29, A-1082 Wien, Telefon (0222) 481543-0. 
































C64 


GRUNDLAGEN 


Die Poris des C 64 


Der Expansion-Port und der User-Port sind zwei 
Anschlüsse, die Ihrem Computer Tür und Tor für 
die verschiedensten Erweiterungen öffnen. Was 
können Sie mit den einzelnen Ports machen? 

P rogramm-Module am Computer betreiben, ein Mo¬ 
dem anschließen, eine Alarmanlage überwachen. 
Drei Beispiele für interessante Anwendungen mit dem 
C64. Ohne User-Port (Bild 1) oder Expansion-Port (Bild 2) 
geht jedoch nichts. 

Der vielseitige Port 


Der User-Port ist eine Schnittstelle, das heißt der C64 ist 
hier fast wörtlich aufgeschnitten. Über eine Schnittstelle 
kann er Daten mit anderen Geräten austauschen. Meß- und 
Steueraufgaben lassen sich über sie lösen. 

Die Anschlußbelegung des User-Ports zeigt Bild 3. Be¬ 
achten Sie bitte, daß die Anschlüsse an der Ober- und Un¬ 
terseite des User-Ports verschiedene Funktionen haben. 
Klemmen Sie deshalb niemals eine Krokodilklemme oder 
etwas Vergleichbares an! 

Der User-Port ist sehr variabel verwendbar. Der Grund ist 
ein im User-Port enthaltener 8-Bit-Parallelport (Bild 3: PBO 
bis PB7), den Sie frei programmieren können. Man kann also 
überden Parallel-Port Daten einiesen und ausgeben. Inter¬ 
essant ist, daß Sie die Datenrichtung für jede der acht Lei¬ 
tungen einzeln bestimmen können. Welche Leitung als 
Eingang und welche als Ausgang geschaltet wird, geben 
Sie über das Datenrichtungsregister vor. Die Abkürzung 
»DDR« für dieses Register kommt aus dem Englischen und 
heißt »Data Direction Register«. Aber wie können mit einem 
Register acht Leitungen gesteuert werden? Das duale Zah¬ 
lensystem gibt den Schlüssel zur Lösung. 

Der User-Port wird programmiert 


Das duale Zahlensystem, mit dem der Computer arbeitet, 
kennt nur zwei Ziffern, die 0 und die 1. Eine Informationsein¬ 
heit, die 0 oder 1 enthält, wird ein »Bit« genannt. Es ist die 
kleinste, in der Computertechnik verwendete Informations¬ 
einheit. Mit einem Bit lassen sich die Dezimalzahlen 0 
(=0*2°) und 1 (=1 *2°) darstellen. Nehmen wir ein zweites 
Bit dazu, so können wir schon Dezimalzahlen von 0 bis 3 
darstellen. Eine Drei ergibt sich, wenn beide Bitseine 1 ent¬ 
halten (1 *2' + 1 *2° = 2 + 1 = 3). Mit acht Bits können 
schon Dezimalzahlen von 0 bis 255 dargestellt werden. Im 
Bild 4 finden Sie als Beispiel, wie die Zahl 223 im dualen Sy¬ 
stem zerlegt ist. Acht Bits ergeben in der Computertechnik 
die nächstgrößere Informationseinheit, ein »Byte«. lhrC64 
hat einen Speicherbereich von 65536 Byte. Das Byte 
56579 ist das Datenrichtungsregister. Wenn Sie dort eine 
Eins im Bit 0 eingeben, wird die dazugehörige Leitung PBO 
auf Ausgang geschaltet. Überprüfen Sie doch einmal das 
DDR nach dem Einschalten, indem Sie eingeben: 

PRINT PEEK (56579) 

Auf dem Bildschirm müßte anschließend eine 0 erschei¬ 
nen, da nach dem Einschalten des Computers die Portlei¬ 
tungen PBO bis PB7 als Eingänge geschaltet sind. Wenn 
Sie den Wert aus unserem Beispiel (Bild 4) mit 

POKE 56579,223 

eingeben, so enthält das DDR die Bitfolge 11011111. Alle 
PB-Leitungen sind nun Ausgänge, bis auf die Leitung PB5. 



Bild 1. Der User-Port des C64 (Pfeil). Von rechts nach links 
sehen Sie die Kontakte 1 bis 12. Die Kontakte A bis N sind 
auf der unteren Platinenseite. 


Uber das DPB-Register (Data-Port B) in der Speicherzel¬ 
le 56577 können Sie nun die einzelnen Ausgänge auf 0 
oder 1 setzen, mit 

POK?’56577,222 

haben Sie dort eine Bitfolge von 11011110 eingegeben. Bis 
auf PBO sind so alle Ausgänge auf 1 gesetzt. Das bedeutet, 
an den Anschluß-Pins D bis H (PB1-PB4), sowie an Pin K 
(PB6) und L (PB7) liegen +5 Volt, während Pin C (PBO) auf 
0 Volt liegt. 

Beim Experimentieren aufgepaßt: die auf 1 gesetzten 
Ausgänge werden von einem integrierten Baustein, dem 
CIA(Control Interface Adapter), auf +5 Volt geschaltet. Ver¬ 
binden Sie diese Anschlüsse aus Versehen mit Masse, 
nimmt Ihnen der CIA diese Behandlung sehr übel. An- 



Bild 2. Der Expansion-Port des C64 (Pfeil). Die 44 Kontakte 
sind über Drähte an der Platine angeschlossen. 
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C64 


1 

>3 4 5 6 

7 8 

9 10 11 12 


A 

C D E F 

H J 

K L M N 

PIN 

BELEGUNG 

PIN 

BELEGUNG 

1 

GND 

A 

GND 

2 

+5V, max. 100 mA 

B 

FLAG2 

3 

RESET 

C 

PB0 

4 

CNT1 

D 

PB1 

5 

SP 1 

E 

PB2 

6 

CNT2 

F 

PB3 

7 

SP 2 

H 

PB4 

8 

PCS 

J 

PB5 

9 

SER. ATN IN 

K 

PB6 

10 

9V AC, max. 100 mA 

L 

PB7 

11 

9VAC, max. 100 mA 

M 

PA2 

12 

GND 

N 

GND 


Bild 3. Der User-Port von hinten gesehen und die Belegung 
der einzelnen Kontakte 

schließend müssen Sie höchstwahrscheinlich Ihren Com¬ 
puter in eine Service-Werkstatt geben. Vorsicht ist geboten. 

Wenn Sie den Port als Eingang benutzen, ist es interes¬ 
sant, einzelne Leitungen zu überprüfen. Das Port-Register 
kommt zu Hilfe. Nach 
PRINT PEEK (56577) 

erscheint der Wert des DPB-Registersauf dem Bildschirm. 
Schalten Sie Ihren Computer noch einmal an, und überprü¬ 
fen Sie das DPB-Register. Sie werden feststellen, daß alle 
Bits auf 1 gesetzt sind. Alle Leitungen des Port B liegen 
demnach auf +5 Volt. 

Mit dem User-Port prüfen 


Nach dem Einschalten sind alle Leitungen des Port B als 
Eingänge geschaltet. Im Gegensatz zu Ausgängen können 
Sie nun jedes einzelne Bit auf 0 setzen, indem Sie die ent¬ 
sprechende Leitung mit Masse verbinden. Aber wie läßt 
sich ein einzelnes Bit vom DPB-Register überprüfen? Des 
Rätsels Lösung ist die »AND«-Verknüpfung«. Um beispiels¬ 
weise das Bit 7 zu überprüfen, geben Sie ein: 

PRINT PEEK (56577) AND 128 

Ist das Ergebnis 128, so enthält das Bit 7 des DPB-Regi- 
sters eine 1. Bei einer 0 als Ergebnis enthält das Bit 7 eben¬ 
falls eine 0. Das Bit 6 können Sie entsprechend mit 

PRINT PEEK (56577) AND 64 

überprüfen. Beim Ergebnis 64 enthält das Bit 6 eine 1, bei 
0 als Ergebnis ist wieder eine 0 enthalten. Auf die gleiche 
Weise lassen sich auch alle anderen Bits überprüfen. 

Wenn Sie die beschriebenen Basic-Anweisungen in Pro¬ 
gramme einbinden, können Sie verschiedenste Steuervor¬ 
gänge hervorrufen und überprüfen. Alarmanlagen lassen 


sich ebenso konstruieren wie blinkende Lämpchenreihen 
oder vieles mehr. 

Module wie »Simons-Basic« oder das Spiel »Soccer« 
werden in den Expansion-Port gesteckt. Nach dem Ein¬ 
schalten steht Ihnen sofort das entsprechende Programm 
zur Verfügung. Wie aber erkennt Ihr Computer, daß ein Mo¬ 
dul eingesteckt ist? Verdeutlichen wir uns die Funktion von 
einigen Kontakten des Expansion-Ports. 

Das Bild 5 zeigt die Kontakte des Expansion-Ports, wie 
Sie sie von hinten sehen. Das Modul legt beim Einschalten 
die Leitung EXROM (Pin 9) gegen Masse (Pin 1,22,A und 
Z). Dadurch wird ein Speicherbereich von 8 KByte (=8192 
Byte) aus dem Speicher des C 64 ausgeblendet. Es sind die 
Speicheradressen 32768 bis 40956. Der Speicherinhalt 
des eingesteckten Moduls befindet sich jetzt in diesem Be¬ 
reich. Ihr Computer weiß damit noch nicht, daß dort ein Pro¬ 
gramm beginnt. Diese Information erhält er, wenn nach 
dem Einschalten die sogenannte »Reset-Routine« durch¬ 
laufen wird. Der Computer überprüft den Inhalt der Spei¬ 
cherzellen 32772 bis 32776. Ist dort der Text »CBM80« ent¬ 
halten, weiß der Computer, daß ein Modul eingesteckt ist. 
Ist kein Modul vorhanden, sind die entsprechenden Spei¬ 
cherzellen nach dem Einschalten leer und der Computer 
setzt die Reset-Routine fort. Findet der Computer aller¬ 
dings »CBM80«, holt er sich aus den ersten beiden einge¬ 
blendeten Speicherzellen (32768 und 32769) die dort abge¬ 
legte Startadresse des Modulprogramms und springt an 
die entsprechende Adresse. Natürlich erfolgt auch nach je¬ 
dem Reset die Abfrage, ob ein Modul vorhanden ist oder 
nicht. Die einfachste Weise, ein Reset auszulösen, ist übri¬ 
gens, am User-Port die Kontakte 3 (Reset) und 1 (Masse) 
miteinander zu verbinden. Mit einem Taster können Sie ein 
hardwaremäßiges Reset fest vorsehen. Aber beachten Sie 
die Ga.ä-tiebedingungen des Herstellers. 



Bild 4. Beispiel für die Umrechnung einer Dualzahl in eine 
Dezimalzahl 


In unserem Port-Artikel wollten wir Sie mit einigen grund¬ 
sätzlichen Verwendungen des Expansion- und User-Ports 
vertraut machen. Wenn Sie sich noch mehr für die beiden 
Ports interessieren, dann möchten wir Sie auf zwei Artikel 
in unseren 64’er-Stammheften aufmerksam machen: auf 
den Artikel »User-Port-Display« (Ausgabe 5/85, Seite 36) 
sowie »Nicht nur ein Geheimdienst: CIA« (2/86, Seite 93). 

(kn/ad) 



Bild 5. Der Expansion-Port von hinten gesehen. Hier werden vor allem Module angeschlossen. 
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C64 


Wie funktioniert ein Computer? 


Haben Sie sich auch schon mal gefragt, was ei¬ 
gentlich in einem Computer abläuft, während Sie 
mit ihm arbeiten? Der folgende Artikel macht Sie 
mit dem Innenleben des Computers vertraut. 

uß eigentlich jemand, der einen Computer bedient, 
auch wissen, wie er funktioniert? 

Es gibt Leute, die dieses verneinen. Sie sagen, es 
ist genauso wie mit dem Auto. Tausende von Fahrern über¬ 
lassen die Kenntnis über Technik und Funktionsweise den 
Reparaturwerkstätten. Sie wissen von Gashebel, Kupp¬ 
lung, Lenkung, Gangschaltung und so weiter gerade so¬ 
viel, um in aller Bequemlichkeit und Schnelligkeit von A 
nach B zu gelangen. Unsere Gesellschaft hat inzwischen 
das Auto trotz seiner hochkomplizierten Technik mit einer 
totalen Selbstverständlichkeit akzeptiert. 

Ich muß zugeben, daß sich der Computer, fast wie das 
Auto, bis heute zu einem leicht bedienbaren Gebrauchsge¬ 
genstand entwickelt hat, der über kurz oder lang unsere Zi¬ 
vilisation genauso tief beeinflussen wird wie das Auto. 


Daß blindes Vertrauen in Ergebnisse eines Computers 
nicht nur Stoff für Science-Fiction-Romane und Witzblätter 
liefert, davon kann so mancher »Computergeschädigte« 
ein Lied singen. 

Der zweite Grund hat direkt mit Ihnen und Ihrem Compu¬ 
terhobby zu tun. Sobald Sie mehr als nur fertige Program¬ 
me und Spiele verwenden wollen, landen Sie zwangsläufig 
beim Programmieren. Selbst bei der für Anfänger idealen 
Programmiersprache Basic kommt man letzten Endes 
nicht ganz ohne Kenntnisse über Arbeitsweise und Funk¬ 
tion des Computers aus. 

Die Sprachen des Computers 


Wenn Sie noch einen Schritt weiter gehen und optimale 
Programme erstellen wollen, kommen Sie an der Program¬ 
mierung in Maschinensprache oder an speziellen Pro¬ 
grammiersprachen wie Forth, C, Pascal oder ADA nicht vor¬ 
bei. Und bei diesen geht ohne Fachkenntnisse gar nichts. 




Schon heute benutzen viele Nicht-Techniker wie Sekretä¬ 
rinnen, Buchhalter und Politiker einen Computer ohne zu 
wissen, wie er funktioniert. 

Warum sollen dann ausgerechnet Sie als Einsteiger sich 
für die Funktionsweise Ihres Computers interessieren ? 

Ich will Ihnen zwei Gründe dafür nennen: 

Für den ersten Grund kann man wieder das Auto heran¬ 
ziehen. Genauso wie eine falsche Einschätzung der techni¬ 
schen Fähigkeiten eines Autos und seiner Bedienung lei¬ 
der allzuoft zu Unfällen und menschlichen Katastrophen 
führt, kann die Unkenntnis der technischen Fähigkeiten ei¬ 
nes Computers zu Katastrophen führen, bislang allerdings 
ohne tödliche Folgen, Viele Firmen sind in große Schwierig¬ 
keiten geraten, weil ein Computer falsch eingesetzt wurde. 


Wenn Sie mir das nicht glauben, dann fordere ich Sie auf, 
in einem Computerladen einmal ein Buch zu diesen Spra¬ 
chen aufzuschlagen. Ich bin überzeugt, daß Sie mir dann 
recht geben werden. 

Natürlich sind Detailkenntnisse über den Computer nicht 
durch Lesen von einigen Seiten wie diesen hier erwerbbar. 
Aber in die grundsätzliche Arbeitsweise eines Computers 
kann ich Sie auf diesen paar Seiten durchaus einführen. 
Ein Computer ist nämlich gar nicht so kompliziert, wie man 
annehmen könnte. Wenn man zum Beispiel an die Riesen¬ 
computer von IBM denkt oder nur die Innereien eines C64 
sieht, welche auf dem großen Bild - etwas verziert - abge¬ 
bildet sind, bekommt man fast Angst vor der Technik. Diese 
Angst ist aber wirklich nicht nötig. 
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Lesen Sie ruhig weiter. Ich werde Sie nicht mit unver¬ 
ständlichen technischen Details plagen. Alles, was ich vor¬ 
aussetze ist, daß Sie schon einmal einen kleinen Taschen¬ 
rechner benutzt haben. 

Rechenmaschinen gibt es schon sehr lange. Die erste, 
die richtig mit Ziffern arbeitete, hat 1623 der Tübinger Pro¬ 
fessor Wilhelm Schickart entworfen. Sie beherrschte die 
vier Grundrechenarten (Addieren, Subtrahieren, Multipli¬ 
zieren, Dividieren) mit dem Ziel, dem Menschen die An¬ 
wendung der Rechenregeln und die vielen Rechenschritte 
abzunehmen. Alle nachfolgenden Rechenmaschinen bis 
hin zu den heutigen einfachen Taschenrechnern tun das 
auch; aber Computer sind sie nicht, denn sie haben Schwä¬ 
chen und Lücken, die Sie sicher aus eigener Erfahrung 
kennen. Wie oft muß man auf die Tasten eines Taschen¬ 
rechners drücken - und wie oft »verdrückt« man sich dabei 
- um eine größere Berechnung mit vielen verschiedenen 
Zahlenwerten durchzuführen. Ohne Notizblock zum Auf¬ 
schreiben von Zwischenergebnissen und ohne 
klares Programm für die Reihenfolge der 
einzelnen Rechenschritte geht das nicht. 
Eine Rechenmaschine aber, die 
sich Ergebnisse merken (spei¬ 
chern) und beliebig oft ver¬ 
wenden kann, und die außer¬ 
dem alle Rechenschritte 
automatisch nach einem 
vorgegebenen Programm 
durchführt - diese Ma¬ 
schine ist ein Computer. 


- Rechenwerk 

- Speicher für Zahlen 

- Speicher für das Programm 

- Leitwerk 

- Eingabegerät für Zahlen und für das Programm 

- Ausgabegerät für die Ergebnisse 

Diese doch recht abstrakten Bezeichnungen will ich 
mit für Sie vertrauten Dingen erklären. 

- dem Rechenwerk entspricht der Taschenrechner, ohne 
Tasten und ohne Anzeige der Zahlen 

- der Speicher für Zahlen hat dieselbe Funktion wie der No¬ 
tizblock, den ich Ihnen in meinem obigen Beispiel ge¬ 
nannt habe 

- dem Speicher für das Programm, das heißt für den Ablauf 
und die Reihenfolge der Rechenschritte, entspricht wie¬ 
derum der Notizblock 

- ein Leitwerk kennen Sie auch. Ihm entspricht der Pro¬ 
grammschalter einer Spül- oder Waschmaschine, der ja 
abhängig von Temperatur, Wasserstand, Zeit und ausge¬ 
wähltem Waschprogramm die einzelnen Funktionen ein- 
und ausschaltet 

- für die Eingabegeräte brauche ich wohl keine Beispiele 
zu suchen. Denn selbst wenn Sie noch keinen eigenen 
Computer haben sollten, haben Sie sicher schon die Ta¬ 
statur eines Computers gesehen, über welche Zahlen 
und Befehle eingetippt werden. Fertige Programme wer¬ 
den über den Kassettenrecorder oder über das Floppy- 
laufwerk in den Speicher geladen 

- für das Ausgabegerät gilt das gleiche: Sie kennen Fern¬ 
seher und Drucker 


Was ist mit den Tönen, den Farben und mit der tollen Gra¬ 
fik unserer Computer, werden Sie vielleicht fragen. Nun, 
diese Eigenschaften finden Sie auch in jedem Spielauto¬ 
maten. Bei einem Computer sind sie lediglich - wie ich zu¬ 
geben muß erfreuliche - Zutaten. 

Struktur eines Computersystems 


Ehre, wem Ehre gebührt: Es waren die Amerikaner A. Burks 
und H. Goldstine, die unter der Leitung des deutschstäm¬ 
migen John von Neumann im Jahr 1946 die folgenden we¬ 
sentlichen Teile eines Computers zum ersten Mal definier¬ 
ten: 


In der Zeichnung (Bild 1, Seite 31) habe ich diese Teile 
des Computers schematisch als Blöcke dargestellt und 
durch Pfeile miteinander verbunden, um zu zeigen, wie sie 
Zusammenwirken. Ich gehe etwas später natürlich näher 
darauf ein. 

J. von Neumann forderte außerdem, daß auf einem Com¬ 
puter beliebig viele verschiedene Programme laufen kön¬ 
nen. Und schließlich schlug er für das Leitwerk eine einfa¬ 
che Steuerung vor, die immer nur einen einzigen Schritt 
nach dem anderen ausführt. 

Wichtig ist, daß fast alle heutigen Computer - zumindest 
aber alle Heim-Computer - noch immer aus diesen Ele¬ 
menten bestehen und nach dem Neumannschen Prinzip 
arbeiten. Geändert hat sich seither nur die Technik. 
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Überhaupt muß ich herausstreichen, daß erst die Elek¬ 
tronik dem Computer zum rasanten Aufschwung verholten 
hat. Und speziell mit der Elektronik verknüpft ist eine weite¬ 
re typische Eigenschaft der Computer, nämlich wie in ihren 
verschiedenen »Werken« die Zahlen dargestellt und verar¬ 
beitet werden. Wir sind gewohnt, im Dezimalsystem, also 
mit den 10 Ziffern 0 bis 9 zu rechnen. Der Computer arbeitet 
dagegen nur mit 2 Ziffern, nämlich mit 0 und 1. Man kann 
das auch mit »Strom an« und Strom aus« bezeichnen. 

Viele von Ihnen haben dieses »Binärsystem« oder auch 
»Dualsystem« genannte Zahlensystem sicher schon in der 
Schule kennengelernt. Dann können Sie getrost den näch¬ 
sten Absatz überspringen. 

Dezimale Zahlen 


Wenn Sie aber wissen wollen, wie die Elektronik mit Zahlen 
umgeht, dann schauen Sie sich mit mir erst einmal das uns 
so vertraute dezimale Zahlensystem an. 

Ein gutes Beispiel zum Dezimalsystem ist der Kilometer¬ 
zähler eines Autos. 

Ich habe in der folgenden Zeichnung die einzelnen Zif¬ 
fernrädchen des Kilometerzählers der Übersicht halber 
seitlich gedreht gezeichnet. 



Wie gesagt, schon die Kinder wissen es: immer wenn ein 
Ziffernrädchen von der 9 auf die 0 weiterdreht, dann schiebt 
es das linke Nachbar-Rädchen um eine Ziffer weiter. Nach 
9 Kilometer geht das erste Rädchen auf 0 und das zweite 
Rädchen von 0 auf 1, so daß der Zähler 10 Kilometer an¬ 
zeigt. Erst wenn das Kind rechnen lernt, wird ihm klar, daß 
die Ziffern auf den Rädchen von rechts aus die Einer, Zeh¬ 
ner, Hunderter, Tausender und so weiter darstellen. 

In einem normalen Zahlensystem kann man die Räd¬ 
chen auch zurückdrehen, wodurch die Zahlen immer klei¬ 
ner werden. Bei den heutigen Kilometerzählern geht das 
nicht. Ich kann mich aber noch gut erinnern, daß im ersten 
VW-Käfer meiner Eltern der Zählerstand beim Rückwärts¬ 
fahren kleiner wurde. Ich nehme an, daß der wachsende 
Gebrauchtwagenmarkt die heutige Einseitigkeit des Zah¬ 
lensystems eines Autos notwendig machte. 

Andere Zahlensysteme 


Dieses Zahlensystem, abgeleitet aus den zehn Fingern des 
Menschen, ist uns von klein auf gut vertraut. 

Ist Ihnen eigentlich bewußt, daß Sie täglich mit mehreren 
verschiedenen Zahlensystemen umgehen? Welche denn, 
fragen Sie? 

Dann schauen Sie bitte auf die Uhr. 

Am besten sieht man es natürlich bei einer Digitaluhr: 

Für die Sekunden und Minuten verwenden wir ein 
Sechziger-System, mit Ziffern von 0 bis 59. Auch hier wird 
nach einer vollen Umdrehung eines »Ziffernrades« das 
Nachbarrad weitergeschaltet, nur findet der Übergang auf 
0 eben erst bei 59 statt. 



Beim Rädchen für die Stunden müssen wir umschalten, 
denn dafür haben wir ein anderes System, oder genauer 
gesagt, sogar zwei. Wir haben die Wahl zwischen einem 
Zwölfer-System oder einem Vierundzwanziger-System. 
Nur das letztere ist eindeutig; beim Zwölfer-System müs¬ 
sen wir nämlich noch angeben, ob wir den Vormittag oder 
den Nachmittag meinen. Dem Zwölfer-System für die Stun¬ 
den ist also noch ein Binärsystem vorgeschaltet. 

In der Rädchendarstellung sieht das so aus: 




Aber es kommt noch schlimmer! Das Stundenrädchen 
stößt seinerseits das Tagesrädchen an. Auch hier verwen¬ 
den wir zwei verschiedene Zahlensysteme: 7 Tage ergeben 
eine Woche und 52 Wochen ein Jahr. Oder aber, 30 oder 31, 
manchmal auch 28 oder 29 Tage ergeben 1 Monat und 12 
Monate ein Jahr. 



Kein Wunder, daß es für uns so schwierig ist, auszurech¬ 
nen, was für ein Wochentag 17 Tage nach Mittwoch, dem 
25. Februar ist. 

So, wenn ich jetzt auf das vom Computer bevorzugte bi¬ 
näre Zahlensystem eingehe, dann schlucken Sie bitte ganz 
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rasch Ihren Einwand hinunter, daß das viel zu kompliziert 
und nicht zu verstehen sei. Ganz im Gegenteil, ein einfa¬ 
cheres Zahlensystem kann man sich angesichts des vorher 
geschilderten Durcheinanders gar nicht vorstellen. 

Schnell noch ein Wort zu seinem Namen: Es sind zwei 
Bezeichnungen für das Zahlensystem mit zwei Ziffern ge¬ 
bräuchlich. Auf englisch heißt das Zweiersystem »binary«. 
Wir verwenden deshalb oft die Ausdrücke »Binärsystem« 
und »Binärziffer«. Gebräuchlich ist aber auch die Bezeich¬ 
nung »Dualsystem« und »Dualzahl«. Lassen Sie sich nicht 
durch diese Uneinigkeit verwirren! 

Als Kilometerzähler sieht das Binärsystem so aus: 



Jedes Rädchen hat nur zwei Ziffern. Beim Übergang von 
1 nach 0 wird das linke Nachbarrädchen weitergedreht. 

Nehmen wir an, am Anfang der Fahrt stehen alle Räd¬ 
chen auf 0. Nach einem Kilometer steht nur das rechte Räd¬ 
chen auf 1, nach 2 Kilometer wieder auf 0, aber es hat das 
zweite Rädchen auf 1 gedreht. Wie das weitergeht, sehen 
Sie in dieser Gegenüberstellung von Dezimalzahlen und 
Binärzahlen: 


DEZIMAL 

0000 
000 1 
0002 
0003 
0004 
0005 
0006 
0007 
0008 
0009 
0010 
00 11 
00 12 
00 13 
0014 
00 15 


BINAR 


00 00 
000 1 
00 10 
00 11 
0 100 
0 10 1 
0 110 
0 111 
1000 
100 1 
10 10 
10 11 
1100 
110 1 
1110 
1111 


ItVI DTK 


Wir können also mit einer vierstelligen Dualzahl die Dezi¬ 
malzahlen von 0 bis 15 darstellen, mit 8 Stellen geht es 
schon bis 256, mit 16 Stellen bis 65535. 

Das Rechenwerk verarbeitet Dualzahlen 


Zum Rechnen braucht man natürlich Zahlen, die sehr viel 
größer sind als 65535, außerdem negative Zahlen, Brüche 
und Zahlen mit vielen Stellen hinter dem Komma. 

Ich muß gestehen, daß die Rechentechnik im Binärsy¬ 
stem nach genauso aufwendigen Rechenregeln arbeitet, 
wie wir sie im Dezimalsystem anwenden. Da Sie dieses 
Rechnen in der Grundschule auch nicht an einem Tag ge¬ 
lernt haben, werden Sie verstehen, daß für die Beschrei¬ 
bung der Arbeitsweise eines binären Rechenwerks sicher¬ 
lich eine eigene Aufsatzreihe erforderlich wäre. 

Aus diesem Grund begnüge ich mich mit dem erneuten 
Hinweis, daß das Rechenwerk im Grunde nichts anderes ist 
als jeder Taschenrechner. Glauben Sie mir bitte, daß es mit 
Dualzahlen sehr wohl geht. 


in Buch !3r 
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Bild 1. Der allgemeine Aufbau eines Computersystems in schematischer Darstellung 


Wenn Sie im Laufe der Zeit öfter mit Dual- und Binärzah¬ 
len arbeiten werden, an dieses Zahlensystem. Genauso, 
wie Sie sich auch an das Zahlensystem gewöhnt haben, 
das bei der Uhrzeit verwendet wird. 

Das Speichern von Zahlen 


Ich habe vorhin gesagt, daß das Speichern von Zahlen eine 
wesentliche Charakteristik eines Computers ist. Der Spei¬ 
cher eines Computers besteht aus vielen kleinen »Fä¬ 
chern«, in welche die Zahlen hineingelegt, beliebig lange - 
zumindest während der Computer eingeschaltet ist - dort 
aufbewahrt, bei Bedarf herauskopiert oder aber herausge¬ 
holt und gelöscht werden können. Diese Fächer - ich pflege 
sie »Speicherzellen« zu nennen - sind alle gleich groß und 
können bei den Commodore-Computern eine achtstellige 
Dualzahl aufnehmen. Jede Speicherzelle hat eine Adres¬ 
se, die dem Leitwerk erlaubt, mit jeder dieser Zellen Zahlen 
auszutauschen. 

Dem Speicher ist es völlig egal, was die Zahlen in seinen 
Zellen darstellen. Es können Zahlenwerte sein, es können 
Buchstaben sein, oder Anweisungen an das Leitwerk oder 
aber Teile des Programms, das wir selbst programmiert 
und in den Computer eingegeben haben. 

Nur das Leitwerk weiß darüber Bescheid. Seinen Einfluß 
auf den Speicher wollen wir uns etwas näher anschauen. 

Das folgende Bild 2 ist fast identisch mit dem ersten Bild: 

Zusätzlich habe ich Tastatur und Bildschirm als Ein- und 
Ausgabegerät eingezeichnet. 


Sobald Sie den Computer einschalten, prüft das Leit¬ 
werk zuerst alle Teile des Computers durch - wie es das 
macht, lassen wir jetzt mal beiseite - und schreibt eine im 
Speicher vorbereitete Nachricht oben auf den Bildschirm. 
Sie kennen sie sicher. Und darunter blinkt der Cursor. Auch 
das wird vom Leitwerk veranlaßt, um zu zeigen, daß über 
die Tastatur irgend etwas eingegeben werden kann. 

Wenn Sie jetzt eine Zahl eintippen, wird diese schon 
beim Tastendruck in eine Dualzahl umgewandelt. Nach der 
Ablage im Speicher schiebt das Leitwerk eine Kopie der Zif¬ 
fer sofort bei der Ausgabe hinaus auf den Bildschirm. 

Die Eingabe wild genau geprüft 


ln der Bedienungsanleitung des Computers steht, daß jede 
Eingabe per Tastatur mit dem Drücken der RETURN-Taste 
abgeschlossen werden muß. Das hat einen guten Grund. 
Durch diese Taste wird nämlich die eingegebene Zahl vom 
Speicher über den dicken Pfeil in das Leitwerk »kopiert«. 
Dort wird sie genau geprüft. In unserem Beispiel erkennt 
das Leitwerk, daß es sich um eine ganz normale Zahl han¬ 
delt, die auch schon auf dem Bildschirm steht. Deshalb 
macht das Leitwerk weiter gar nichts, sondern setzt bloß 
den Cursor auf den Anfang der nächsten Zeile und wartet 
auf eine neue Eingabe. 

Wenn Sie jetzt eintippen: 

A = 23 * 65 

erscheint wieder wie vorher sofort das Eingegebene auf 
dem Bildschirm. Durch Drücken der RETURN-Taste läuft 
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wieder der Prüfprozeß des Leitwerks ab. Aber die Prüfung 
der eingegebenen Werte hat jetzt ein anderes Resultat. 

Den Unterschied macht das Mal-Zeichen »*« aus. Durch 
dieses Zeichen erkennt das Leitwerk, daß mit der ersten 
Zahl eine Multiplikation durchgeführt werden soll. Es veran¬ 
laßt, daß die erste Zahl in das Rechenwerk geschoben wird. 
Nachdem auch die zweite Zahl in das Rechenwerk übertra¬ 
gen wurde, startet die Multiplikation der beiden Zahlen. Das 
Ergebnis kommt in den Speicher. Schließlich geht der Cur¬ 
sor wieder in die Warteposition. 

Das Ergebnis bleibt im Speicher 


Und wo ist das Ergebnis der Rechnung? Im Speicher natür¬ 
lich - wo sonst. Ich weiß, Sie haben erwartet, daß das Leit¬ 
werk das Ergebnis über die Ausgabe auf den Bildschirm 
bringt. Aber das haben wir dem Leitwerk nicht gesagt. 

Sie sehen, das Leitwerk befolgt zwei Arten von Anwei¬ 
sungen - und die ganz stur! 

Erstens führt es Befehle aus, die wir ihm über die Einga¬ 
be vorgeben. Das Mal-Zeichen ist so ein Befehl. 

Zweitens hat es interne Anweisungen und Vorschriften, 
wie zum Beispiel die durch die RETURN-Taste ausgelöste 
Prüfung der Eingabe oder der genaue Ablauf der Multipli¬ 
kation oder auch das direkte Durchschieben der eingetipp¬ 
ten Zahlen und Zeichen auf den Bildschirm. 

Wenn also das Leitwerk das Ergebnis einer Rechnung im 
Rechenwerk nicht sofort auf den Bildschirm bringt, weil es 
dazu keine innere Anweisung hat, müssen wir ihm selbst 
diesen Befehl geben. Dieser Befehl heißt, wie Sie ja sicher 
schon wissen, PRINT. Also tippen wir ein: 

PRINT 23 * 65 

und betätigen anschließend die RETURN-Taste. Als erstes 
sieht das Leitwerk die Buchstaben von PRINT. Auch diese 
werden zuerst in Dualzahlen verwandelt, um sie wie die 
Zahlen speichern zu können. Die Umwandlung erfolgt 
nach Codezahlen, die jedem Buchstaben zugeordnet sind. 

Aber wenn das Leitwerk Buchstaben sieht, schaut es 
nach, ob es sich um einen Befehl handelt. Dazu hat es in 
einem ganz bestimmten Teil des Speichers - sozusagen 
fest eingebaut - alle Befehle gespeichert, die auf dem Com¬ 
puter erlaubt sind. Sind die eingegebenen Zeichen ein gül- 


LEITWERK 



EINGABE AUSGABE 


Bild 2. Schemadarstellung eines Computer-Systems mit 
angeschlossenen Ein-/Ausgabegeräten 

tiger Befehl, dann führt das Leitwerk den Befehl aus. In un¬ 
serem Beispiel ist es wieder die Multiplikation, deren Er¬ 
gebnis aber, im Gegensatz zu vorhin, wegen des Befehls 
PRINT zusätzlich auf den Bildschirm gebracht wird. 

Was passiert aber, wenn der Befehl nicht gültig ist? Nun, 


probieren Sie es aus. Tippen Sie einfach den Befehl falsch 
ein, etwa so: 

PLINT 23 * 65 

Diesen Befehl findet das Leitwerk in seinem »Wörter¬ 
buch« natürlich nicht. Deshalb führt es die Multiplikation 
gar nicht erst aus, sondern holt aus dem Speicher eine an¬ 
dere vorbereitete Nachricht »?SYNTAX ERROR« und 
schreibt sie auf den Bildschirm. Wir nennen das eine Feh¬ 
lermeldung, die soviel besagt wie »Falsches Wort«. 

Bislang haben wir Zahlen und Befehle nur durch den 
Speicher »durchgeschoben«. Wie beim Notizblock muß es 
aber möglich sein, Zahlen zu speichern und später wieder 
herauszuholen. Beim Notizblock ist das einfach. Allerhöch- 
stens kann es erforderlich sein, daß man wissen muß, auf 
welchem Blatt und in welcher Zeile die Zahl steht, die man 
sucht. 

Um im Speicher des Computers eine bestimmte Zahl zu 
finden, müssen wir wissen, in welcher Speicherzelle sie 
steht. Man muß also immer ihre Adresse wissen. Das Leit¬ 
werk erleichtert uns aber die Sache. Alles, was wir tun müs¬ 
sen, ist, der Zahl einen Namen zu geben. Den Rest des Su- 
chens besorgt das Leitwerk. Probieren wir das aus. Wir ge¬ 
ben der Zahl 74 den Namen A. 

A = 74 

Um zu sehen, daß diese Zahl wirklich im Speicher zu fin¬ 
den ist, geben wir dem Leitwerk die Anweisung, die Zahl mit 
dem Namen A auf den Bildschirm zu bringen: 

PRINT A 

Und siehe da, auf dem Bildschirm erscheint die Zahl 74. 
Diesen zweiten Befehl können wir wiederholen, so oft wir 
wollen. Das Resultat ist immer gleich, was beweist, daß die 
Zahl 74 wirklich im Speicher steht. 


Schauen Sie sich bitte noch einmal Bild 2 genauer an. Al¬ 
les, was bisher der Computer gemacht hat, war eigentlich 
nur, Zahlen von einem Geräteteil zum anderen zu schicken. 
Der einzige Teil, der Zahlen verändert hat, war das Rechen¬ 
werk. Um zu zeigen, daß dieser Zahlentransport unter der 
Steuerung des Leitwerks verläuft, habe ich zwei Arten von 
Pfeilen gezeichnet und ihnen auch Namen gegeben. Die 
dicken Pfeile heißen »Datenleitung«, die dünnen »Steuer¬ 
leitung«. 

Die Datenleitungen, auf denen die Zahlen von einem Ge¬ 
räteteil zum anderen laufen, gleichen Schienen einer Ei¬ 
senbahn. Über die Steuerleitungen stellt das Leitwerk die 
Weichen so, daß die Zahlen immer an die richtige Stelle ge¬ 
langen. 

Man kann mit Fug und Recht sagen, daß der Computer 
einfach ein Verschiebebahnhof für Daten ist. 

Ohne technisch zu werden, will ich versuchen, Ihnen das 
Prinzip der »Schienen und Weichen« zu erklären. 

Im Abschnitt über die Zahlensysteme habe ich erwähnt, 
daß die Elektronik die Dualzahlen durch Fließen von Strom 
oder Nichtfließen von Strom darstellt. Ich habe auch ge¬ 
sagt, daß Strom durch Schalter ein- und ausgeschaltet 
wird. Das haben früher Relaiskontakte besorgt. Heute sind 
es Transistoren, durch die entweder Strom oder kein Strom 
fließt. Sie funktionieren für den elektrischen Strom wie Tore, 
die von den Steuerleitungen des Leitwerks auf- und zuge¬ 
macht werden. In Bild 3 ist dargestellt, wie die dreistellige 
Dualzahl 101 in das Rechenwerk gelangt, wenn das Steuer¬ 
signal S die rechten Tore, oder in das Leitwerk, wenn das 
Steuersignal L die oberen Tore aufmacht. 

Die Transistorschaltungen, welche die Tore darstellen, 
heißen sinnvollerweise »Gatter« oder auf englisch »Gate«. 
In den einzelnen schwarzen Bausteinen, die Sie auf dem 
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C64 


großen Bild der Innereien des Computers sehen, sind Tau¬ 
sende von solchen Gattern untergebracht. 

Am Anfang habe ich als eine weitere wesentliche Eigen¬ 
schaft der Computer erwähnt, daß alle Rechenschritte au¬ 
tomatisch nach einem vorgegebenen Programm durchge¬ 
führt werden. 

Für seine Aufgabe ist dem Leitwerk in der Tat ein sehr um¬ 
fangreiches internes Programm vorgegeben. Dieses 
schreibt ihm für den gesamten Betrieb des Computers bis 
ins kleinste Detail vor, wann es welche Tore auf- und zuma¬ 
chen muß und auf welchen Schienen die Zahlen transpor¬ 
tiert werden. 

Dieses interne Programm wird »Betriebssystem« ge¬ 
nannt. Es ist in einem speziell dafür reservierten Teil des 
Speichers fest »eingebrannt«. So fest, daß es auch durch 
Ausschalten des Computers nicht gelöscht wird. 

Das Betriebssystem 


Das Betriebssystem ist ein aus vielen Einzelprogrammen 
bestehendes riesiges Programmpaket, welches beim C64 
zum Beispiel fast ein Drittel des ganzen Speichers füllt. Die 
Betriebssysteme der Commodore-Computer sind sich sehr 
ähnlich. Viele Teile des Betriebssystems vom C128 sind zum 
Beispiel bereits im ersten Heim-Computer, dem PET, vor 
vielen Jahren verwendet worden und finden sich in allen 
Computern bis eben hin zum C128. Andere Teile wieder, 
wie zum Beispiel der Ablauf, wie und wie viele Zeichen in ei¬ 
ner Zeile des Bildschirms stehen dürfen, mußten für fast je¬ 
den Computertyp neu entwickelt werden. Haben doch der 


VC20 22 Zeichen pro Zeile, der C64 40 Zeichen und der 
C128 80 Zeichen pro Zeile. 

Man muß es aber noch einmal betonen, das Betriebssy¬ 
stem ist das eigentliche Herz des Leitwerks und damit des 
ganzen Computers. 

Ich will Ihnen an einem kleinen einfachen Beispiel zei¬ 
gen, wie solche internen Anweisungen an das Leitwerk 
aussehen. 

Die folgende Liste zeigt die einzelnen Schritte, die not¬ 
wendig sind, um zu erkennen, was über die Tastatur einge¬ 
geben worden ist: 

1. lies das nächste eingegebene Zeichen 

2. wenn es eine Ziffer ist, dann speichere sie ab und 
springe zurück auf Zeile 1 

3. wenn es ein Buchstabe ist, dann vergleiche ihn mit Be¬ 
fehlen des Wörterbuches 

4. wenn es kein gültiger Befehl ist, springe auf die Adres¬ 
se im Speicher, wo der Programmteil beginnt, der die Feh¬ 
lermeldung »SYNTAX ERROR« ausdruckt 

5. wenn es ein gültiger Befehl ist, lies im Wörterbuch die 
zu dem erkannten Befehl gehörige Speicherstelle, wo der 
Programmteil für diesen Befehl beginnt, springe auf diese 
Adresse und fahre dort fort 

6. wenn es nur ein Teil eines gültigen Befehls ist, speiche¬ 
re ihn und springe zurück zur Zeile 1 

Sie sehen, daß in dieser Sequenz Entscheidungen ge¬ 
fällt werden, die von vorgegebenen Prüfungen abhängen. 
Diese Tatsache beziehungsweise diese Fähigkeit des 
Computers wird in vielen Diskussionen dahingehend aus¬ 
gelegt, daß ein Computer eine eigene Intelligenz besitzt. 
Ich bin aber der Meinung, daß dem nicht so ist, denn die Ba- 
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Bild 3. So gelangt die Dualzahl 101 in das Rechenwerk 


sis für die Entscheidung und die Entscheidungsvielfalt ist 
streng vom Erbauer des Betriebssystems vorgegeben. 

Wichtig ist aber, daß das Leitwerk nach Prüfung der Si¬ 
tuation viele verschiedene Pfade einschlagen und verfol¬ 
gen kann. 

Diese Anweisungen an das Leitwerk haben eine prinzi¬ 
pielle Schreibweise. Zuerst kommt immer der Code für eine 
Anweisung, danach eine oder mehrere Zahlen, die je nach 
Art der Anweisung entweder Zahlenwerte oder aber Adres¬ 
sen einer anderen Speicherzelle sind. 

Die Anweisungen, die nicht identisch sind mit den von 
uns eingegeben Befehlen, wie zum Beispiel PRINT, legen 
fest, welche Gatter (Tore) auf- oder zugemacht werden 
müssen. 

Die Leitwerke der Commodore-Computer kennen unge¬ 
fähr 150 verschiedene interne Anweisungen. 

Alle diese Anweisungen stehen - als Dualzahlen ver¬ 
schlüsselt - der Reihe nach in den einzelnen Zellen des 
Speichers. 

Alles was das Leitwerk tun muß, ist, die Zahlen der Reihe 
nach aus den Speicherzellen zu holen, sie zu interpretieren 
und entsprechend zu handeln. Um die Übersichtzu behal¬ 
ten, besitzt es einen Zähler, der »Befehlszähler« genannt 
wird, aber eigentlich ein Adressenzähler ist. 

Wenn die internen Anweisungen abweichend von der 
Reihenfolge einen Sprung vorschreiben, wie in meinem 
Beispiel oben in den Zeilen 4 und 5, dann wird einfach die 
Adresse, ab der die neuen Anweisungen beginnen, in den 
Befehlszähler geschrieben und das Leitwerk macht dort 
weiter. 

Ich habe gesagt, daß das Betriebssystem ein großes, fest 
eingebautes Programmpaket darstellt, das nur für den Be¬ 
trieb des Computers gedacht ist und welches wir von außen 
nicht beeinflussen können. 


Was ist ein Programm? 


Bekanntlich können wir selbst auch Programme schreiben 
und eingeben. Sie betreffen ihrerseits nicht den internen 
Betrieb des Computers, sondern veranlassen - sozusagen 
auf einer höheren Ebene - den Computer, die vom Pro¬ 
grammierer ausgedachten Dinge zu tun. 



Man kann für diese Programme denselben Code ver¬ 
wenden wie den für die Anweisungen des Betriebssystems. 
Man nennt das »Maschinensprache«. Da das aber sehr 
mühsam ist, wurden Befehle erfunden, die unserer Spra¬ 
che ähnlich sind. Eine dieser »höheren« Programmierspra¬ 
chen ist Basic. Im Betriebssystem gibt es daher ein speziel¬ 
les Teilprogramm - »Übersetzer« genannt -, welches diese 
Basic-Befehle in Maschinensprache umwandelt. 

Ich will Ihnen beschreiben, wie ein Basic-Programm ent¬ 
steht. 

Wir haben vorher nur einzelne Befehle in den Computer 
eingegeben. Aus mehreren solchen Befehlen entsteht da¬ 
durch ein Programm, daß die Befehle zuerst im Speicher 
gespeichert werden und dann auf Abruf der Reihe nach 
vollautomatisch ablaufen. 

Die ersten Programmierschritfe 


Um das zu erreichen, müssen den einzelnen Befehlen 
Nummern gegeben werden. In Anlehnung an unser frühe¬ 
res Beispiel sieht das so aus: 

1 A = 74 

2 PRINT A 

3 PRINT 23 * 65 

Wenn wir diese Zeilen eintippen und nach jeder Zeile, 
wie vorher, die RETURN-Taste drücken, erkennt das Leit¬ 
werk an der ersten Zahl, daß es sich um eine Programmzei¬ 
le handelt. Es führt den Befehl daher nicht aus, sondern 
bringt die ganze Zeile in den Speicher. Wenn wir nach 
Beendigung der Eingabe den Befehl 
RUN 

eingeben, dann werden diese drei Befehle unter Anwei¬ 
sung Hes Betriebssystems aus dem Speicher in das Leit¬ 
werk yebracht und der Reihe nach ausgeführt. Wenn Sie in 
diesem Heft die anderen Artikel ansehen, finden Sie viele, 
zum Teil recht komplizierte, derartige Programme. 

Wir können also festhalten, daß ein Programm eine Folge 
von Befehlen ist, die dem Computer mitteilen, was er zu tun 
hat. Je mehr ein Programm leisten muß, desto mehr Befeh¬ 
le müssen enthalten sein. 

Das Programm steht im Speicher, der auch allerhand an¬ 
dere Dinge enthält, vieles habe ich schon erwähnt: 

- die vorgegebenen Programme des Betriebssystems 

- die von uns eingegebenen Programme 

- die Zahlen, denen wir einen Namen gegeben haben, um 
sie wieder zu finden (die Variablen) 

- die Zahlen und Zeichen, die während des Eintippens so¬ 
fort auf dem Bildschirm erscheinen. 


RAM 

für 

Betr- 

System 

RAM 

lür 

Bild¬ 

schirm 

RAM 

lür 

BASIC-Programme, Varlable,Texte 

ROM 

für 

Übersetzer 

RAM 

für 

Masch.- 

Progr, 

ROM 

für 

Betriebs¬ 

system 








0 1024 2048 40960 49152 53248 65635 


Bild 4. Die Speicheraufteilung des C64 

Was ich nicht erwähnt habe, sind: 

- ganze Wörter und lange Texte 
Den Speicherbereich, in dem unlöschbar das Betriebs¬ 
system gespeichert ist, nennen wir ROM, nach den An¬ 
fangsbuchstaben der englischen Bezeichnung »Read Only 
Memory«, zu deutsch Festwertspeicher. 

Der andere Speicherteil, in den wir Daten beliebig spei¬ 
chern und auch wieder herausholen können, trägt den Na¬ 
men RAM, nach den Anfangsbuchstaben von »Random 
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Computer 



Computeranschluß 


Bild 5. Das Gesamtschema eines Computer-Systems 

Access Memory«. Auf deutsch heißt das: Speicher mit frei¬ 
em Zugriff. 

Bild 4 zeigt als Beispiel die Speicheraufteilung des C64. 
Sie sehen, daß nur der Bereich von 2048 bis 40960 für 
Basic-Programme genutzt werden kann (38913 Byte). Er 
enthält ebenfalls Daten, das das Programm braucht. Im 
nachfolgenden Artikel können Sie über diese Thematik 
noch viel mehr erfahren. 

Ein- und Ausgabegeräte 


Die Möglichkeiten, Geräte an den Computer anzuschlie¬ 
ßen, sind vielfältig. Ich habe für Sie eine Liste zusammen¬ 
gestellt, die sie aufzählt und identifiziert, ob es sich um ein 
Eingabe- oder Ausgabegerät handelt. 


Mit dem Joystick können acht verschiedene Zahlen (Po¬ 
sitionen) zur Steuerung von Spielen und Programmen ein¬ 
gegeben werden. 

Der User-Port ist eine Steckerverbindung, über die bei¬ 
spielsweise zwei Computer miteinander verbunden wer¬ 
den können. 

Der Erweiterungs-Port ist ebenfalls ein Stecker, in den 
zusätzlicher RAM- oder ROM-Speicher angeschlossen 
werden kann. 

Wie kann es sein, daß über ein einziges Verbindungska¬ 
bel manche Geräte sowohl ein- als auch ausgeben kön¬ 
nen? 

Das Leitwerk ist in der Lage, durch entsprechende Steue¬ 
rung der Gatter die Zahlen und Daten entweder in der einen 
oder in der anderen Richtung zu transportieren, allerdings 
nicht gleichzeitig. 

Eine letzte Übersicht 


Diese »Zweibahnstraße« ist in Bild 5 breit und durch zwei 
Pfeile dargestellt. 

Dieses Bild zeigt Ihnen nochmal alle Teile des Compu¬ 
ters, insbesondere alle Ein- und Ausgabegeräte, die mit 
dem Computer kommunizieren. 

Und noch eine Spezialität zeigt dieses Bild: Die heutige 
Mikroelektronik hat eine Zusammenfassung des Rechen¬ 
werks und des Leitwerks (ohne Betriebssystem natürlich) 
auf einem integrierten Schaltkreis (man sagt auch »Chip« 
dazu) ermöglicht. Diese Kombination hat einen Namen, der 
inzwischen sehr berühmt geworden ist, nämlich »Mikropro¬ 
zessor«. In der Fachsprache heißt er auch »CPU« (Central 
Processing Unit). Er ist heutzutage das Herz eines jeden 
Computers. 

Es gibt zwei wesentliche Gründe, warum die Elektronik 
trotz der Beschränkung auf das Binärsystem die Mechanik 
bei den Computern verdrängt hat. 

Der eine ist die Technik der Chips, die es ermöglichen, ei¬ 
nen Mikroprozessor auf einem nur wenige Quadratmillime¬ 
ter großen Plättchen unterzubringen. 

Der zweite Grund liegt in der überlegenen Geschwindig¬ 
keit der elektronischen Bauelemente, wie die folgende Ta¬ 
belle stark vereinfacht zeigt: 


BAUELEMENT 

ÄNDERUNGEN PRO 
SEKUNDE 

Lichtschalter 

5-10 

mechanischer Zähler 

10-20 

Relais 

50 - 100 

Elektronenröhre 

1000 - 2000 

Transistor 

ca. 100000 

integrierter Schaltkreis 

über 1 Million 


GERÄT/ANSCHLUSS 

EINGABE 

AUSGABE 

Tastatur 

X 


Bildschirm 


X 

Kassettenrecorder 

X 

X 

Floppy Disk 

X 

X 

Joystick 

X 


Drucker 


X 

User-Port 

X 

X 

Erweiterungs-Port 

X 

X 


Bemerkenswert ist, daß nur die Tastatur und der Joystick 
reine Eingabegeräte und nur Bildschirm und Drucker reine 
Ausgabegeräte sind. Alle anderen können beides. Ich kom¬ 
me gleich noch darauf zu sprechen. 

Tastatur und Bildschirm habe ich schon beschrieben. 

Kassettenrecorder und Floppy-Laufwerk dienen zur 
Speicherung der von uns geschriebenen Programme und 
deren Ergebnisse. Denken Sie daran, alles was im RAM- 
Speicher steht, geht verloren, sobald wir den Computer 
ausschalten. Deshalb wird vorher der RAM-Inhalt auf die 
magnetischen Speichermedien Kassette oder Diskette ge¬ 
speichert (Ausgabe) und später von dort wieder in den 
Computer geladen (Eingabe). 

Der Drucker ist ein reines Ausgabegerät und druckt den 
Inhalt des RAM-Speichers auf Papier. 


Wie gesagt, die alten mechanischen Rechenmaschinen 
benutzten noch, von wenigen Ausnahmen abgesehen, das 
Dezimalsystem. Die ersten richtigen Computer wurden mit 
Relais aufgebaut und mit ihnen begann erst das Zeitalter 
des Binärsystems. Damit wurde eine Revolution ausgelöst, 
die man sich immer wieder mal vor Augen halten sollte: 

Innerhalb von 30 Jahren hat sich die Rechengeschwin¬ 
digkeit von Computern von 100 Rechenschritten pro Se¬ 
kunde auf mehrere Millionen pro Sekunde gesteigert, zu¬ 
gleich ist die Größe der Computer von zimmerfüllenden 
Schränken auf die Größe des C64 geschrumpft und nicht 
zuletzt ist der Preis eines Computers von Millionen Mark 
auf etwa 300 Mark gefallen und damit für jedermann er¬ 
schwinglich geworden. 

(Dr. Helmut Hauck/kn) 
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Der Teil des C64, dem er seinen Namen verdankt, 
ist sein 64 KByte großer Arbeitsspeicher. Doch 
was heißt das eigentlich? Und wie ist dieser gan¬ 
ze Speicher aufgebaut? In Form eines kleinen 
Kurses möchten wir diese und ähnliche Fragen 
klären, und Sie mit dem Innenleben Ihres Compu¬ 
ters vertraut machen. 

I st es Ihnen auch so ergangen? Irgendwann stand der 
Commodore 64 in Ihrem Zimmer und verlangte nach 
Programmen. Doch woher? Software kaufen, das ist 
teuer; selber schreiben, dazu muß man das System ken¬ 
nen. 

In diesem Kurs wollen wir versuchen, Ihnen das Innenle¬ 
ben Ihres Commodore offenzulegen. Alle Fachausdrücke, 
die dabei eine Rolle spielen, sollen erklärt werden. Nach 
der Lektüre werden Sie in der Lage sein, weitergehende Li¬ 
teratur (falls Sie Blut geleckt haben) zu lesen und zu verste¬ 
hen. Aber auch, wenn Sie sich auf diesen Kurs beschrän¬ 
ken, beherrschen Sie Ihren Computer viel besser als vor¬ 
her. 

CPU kommt von »Central Processing Unit«, was soviel 
heißt wie »zentrale Arbeitseinheit«. Manche nennen sie 
auch liebevoll »Mikroprozessor«. Aber alle meinen damit 
den Verkehrspolizisten in unserem Computer, der im C64 
den Namen 6510 trägt. 

Unserer CPU sieht man das alles gar nicht an. Wie ein 
glatter, rechteckiger schwarzer Käfer mit vielen Beinchen 
sieht die CPU aus. Erst wenn man ihr die Schale abnimmt 
und sie mit einem starken Mikroskop betrachtet, erkennt 
man schemenhaft die Struktur all dieser Einrichtungen. 
Die CPU versteht uns übrigens gar nicht, wenn wir mit ihr 
Basic sprechen. Alles muß ihr erst noch in eine spezielle 
Sprache übersetzt werden, die nur aus Nullen und Einsen 
besteht, in das sogenannte Binärsystem. Wenn man aller¬ 



dings 'n dieser oder einer ihr sehr nahen Sprache mit der 
CPU zu sprechen versteht, dann erlebt man plötzlich einen 
Abglanz dieser wahnwitzigen Arbeitsgeschwindigkeit. 
Man nennt das dann in »Assembler« programmieren, ge¬ 
nauer gesagt, in 6502-Assembler (denn 6502 ist ein naher 
Verwandter unserer 6510 beziehungsweise der 8500 im 
neuen C64). 

Bei dem Begriff ROM handelt es sich - wie so häufig - um 
die Abkürzung eines englischen Ausdrucks: »Read Only 
Memory«. Das heißt zu deutsch »Nur Lese-Speicher« und 
ist die Bibliothek im Computer. In diesen Speicherbereich 
kann nichts hineingeschrieben werden. So liegt zum Bei¬ 
spiel an der Adresse 65383 in unserem Commodore 64 das 
Betriebssystem-ROM. Wenn Sie mal mit dem Befehl 
»PRINT PEEK (65383)« nachsehen, was an dieser Adresse 
steht, dann finden Sie eine 1. Nun versuchen Sie mal, et¬ 
was dort hineinzuschreiben, beispielsweise mit »POKE 
65383,255«. 

Was ist ein ROM? 


Im Normalfall würde man bei einem erneuten »PRINT 
PEEK(65383)« die Zahl 255 erwarten. Hier aber findet man 
konstant die 1. ROM-inhalte haben nämlich die angeneh¬ 
me Eigenschaft, immer vorhanden zu sein, auch nach dem 
Abschalten des Stroms. Deswegen sind alle »lebenswichti¬ 
gen« Funktionen unseres Computers darin fest einpro¬ 
grammiert. 

Im ROM befindet sich also das Betriebssystem. Es be¬ 
sitzt beispielsweise eine Routine, die 60mal in der Sekunde 
abfragt, ob wir eine Taste gedrückt haben. Ebenfalls im 
ROM (aber an einer anderen Stelle) ist der Übersetzer, der 
unserer CPU sagt, was ein Basic-Befehl in der speziellen 
Binärsprache bedeutet. Diesen nennt man Interpreter. Daß 
Sie ein »A« auf dem Bildschirm sehen, wenn Sie eines ein 
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1 REM ********************************* <250> 

2 REM * * <229> 

3 REM * D E M 0 1 * <060> 

4 REM * * <231> 

5 REM * HEIMO PDNNflTH HAMBURG 1985 * <079> 

6 REM * * <233> 

7 REM ********************************* <000> 

8 REM <151> 

9 REM +++++++ HAUPTPROGRAMM +++++++ <217> 

10 PRINT CHR*(147):POKE 211,7:P0KE 214,10: 

SYS 58640 <243> 

15 PRINT "SO SIEHT EIN ROM-BEREICH AUS:":F 

OR 1=55296 TO 56295:POKE I,0:NEXT I <002> 

20 J = 1:W=128:GOSUB 200:FOR 1=40960 TO 4096 

0+1023:POKE I,PEEK(I):NEXT I <239> 

25 GET A*:IF A*="" THEN 25 <077> 

30 J=3:W=48:GOSUB 200:PRINT CHR*<147):POKE 

211,0:POKE 214,10:SYS 58640 <113> 

35 PRINT "DAS IST DER VOM COMPUTER RESERVI 

ERTE RAM" <052> 

37 FOR 1=55296 TO 56295:P0KE I,0:NEXT I <214> 
40 J=3:W=0:GOSUB 200 <035> 

45 GET A*:IF A*="" THEN 45 <099> 

50 POKE 56576,151:POKE 56578,63:POKE 5327 

2,21:POKE 648,4:END <254> 

199 REM ++ UP.BILDSCHIRM VERSCHIEBEN ++ <228> 

200 POKE 56576,(PEEK(56576)AND 252)OR J <075> 

205 POKE 56578,PEEK(56578)OR 3 <164> 

210 POKE 53272,(PEEK(53272)AND 15)0R M <027> 

215 P=(W/16*1024+16384*(3-J)1/256 <039> 

220 POKE 648,P <145> 

225 RETURN <111> 

Listing 1 zeigt, wie es im RAM/ROM aussieht 


tippen, verdanken Sie dem Zeichen-ROM, in dem alle 
Buchstaben, Zahlen, Grafikzeichen und so weiter als von 
der CPU abrufbare Muster hinterlegt sind. 

Eine andere Sorte von Speicher im Computer ist das 
RAM. Auch dies ist wieder eine Abkürzung eines engli¬ 
schen Ausdrucks (»Random Access Memory«), das heißt 
»Speicher mit beliebigem Zugriff«. Man kann aus diesem 
Speicher lesen und man kann hineinschreiben. Das RAM 
enthält nur flüchtige Informationen. Wenn der Computer 
ausgeschaltet wird, ist es wie das Auswischen der Schrift 
auf einer Tafel. Der Speicherinhalt ist weg. Wo finden wir 
das RAM im C64? Grob gesagt, überall dort im Speicher, 
wo kein ROM ist. Das RAM ist der Bereich, wo wir uns als 
Benutzer austoben können. Alle Basic-Programme, Varia¬ 
blen, Felder und Strings schreiben wir ins RAM. Von Disket¬ 
te oder Kassette laden wir ins RAM, ja selbst der Inhalt des¬ 
sen, was auf dem Bildschirm zu sehen ist, ist RAM-Inhalt. 

ROM und RAM 


Bestimmt haben Sie das schon bemerkt, wenn Sie durch 
POKE-Kommandos auf den Bildschirm geschrieben ha¬ 
ben. Die Befehle »POKE 1024,1: POKE 55296,0« erzeugen 
zum Beispiel ein schwarzes »A«, weil in die erste RAM- 
Speicherstelle des Bildschirms der Code für A und in die er¬ 
ste Bildschirm-Farbspeicherstelle der Code für die Farbe 
Schwarz geschrieben wird. Aber nicht nur wir als Benutzer 
benötigen das RAM. Auch unser Computer hat viel Bedarf 
daran. Jede Tätigkeit erfordert von ihm das Ablegen von 
Notizen, zum Beispiel für irgendwelche Zwischenergebnis¬ 
se oder Adressen. Deswegen ist ein großer Teil des RAM 
unserem normalen Zugriff entzogen. Lediglich durch 
POKE-Kommandos können wir der CPU dort ihre »Allein¬ 
herrschaft« streitig machen. Dafür haben wir allerdings 
dann auch die Folgen zu tragen. 

Wir wollen uns später noch genau mit diesen ganzen De¬ 
tails befassen. Wie das ROM und das reservierte RAM aus¬ 
sieht, soll Ihnen ein kurzes Programm zeigen, das als Li¬ 
sting 1 abgedruckt ist: 

Tippen Sie es ein (dabei dürfen Sie die REM-Zeilen weg¬ 


lassen) und starten Sie mit »RUN«. Zunächst wird der Bild¬ 
schirm leer, um dann anzukündigen, daß jetzt der Inhalt 
des ROM gezeigt wird. Sobald die Schrift schwarz wird, 
schaltet unser Computer den ROM-Inhalt auf den Bild¬ 
schirm. Jedes Zeichen, das Sie dort sehen, gehört zum 
Programm des Basic-Interpreters und ist für uns zunächst 
völlig unverständlich. Das liegt daran, daß wir auf dem Bild¬ 
schirm die Binärsprache der CPU als Bildschirmcode 
(POKE-Code) dargestellt sehen. Und das sind eben irgend¬ 
welche Zeichen mit Codes zwischen 0 und 255. Sehen Sie 
genau hin, dann stellen Sie fest, daß - nachdem das Bild 
fertig ist - keinerlei Veränderung mehr zu erkennen ist. Das 
ist eben das Merkmal von ROM-Inhalten. Sie bleiben, wo 
und wie sie sind. 

Bits und Bytes, was sind das? 


Das Bild bleibt so, bis Sie eine Taste drücken (bitte nicht 
die RUN/STOP-Taste). Danach meldet sich wieder der nor¬ 
male Bildschirm mit der Ankündigung, daß als nächstes 
der vom Computer reservierte RAM gezeigt wird. Das ge¬ 
schieht nach einer kurzen Zeitspanne. Da ist jetzt ordent¬ 
lich was los auf dem Bildschirm! Das Flackern an einigen 
Stellen zeigt, daß die CPU dort gerade Eintragungen verän¬ 
dert. 

Hoffentlich entschädigt Sie dieser Einblick in sonst ver¬ 
borgene Bereiche unseres C64 dafür, daß Sie vom Pro¬ 
gramm noch kaum etwas verstehen. Seien Sie jedoch un¬ 
besorgt, im Verlauf dieses Kurses wird sich das noch än¬ 
dern. Vorerst aber achten Sie darauf, daß wirklich alle Pro¬ 
grammzeilen fehlerfrei eingegeben werden. Eine falsche 
Zahl könnte den Computer zum Absturz bewegen, aus dem 
nur noch das Aus- und wieder Einschalten rettet. Deshalb 
(das sollte man ohnehin immer machen): Vor dem RUN 
speichern. 

Wir werden uns nun nach und nach soweit Vorarbeiten, 
daß wir verstehen, was im Speicher entfalten ist. 

Ein Computer ist ein elektrisches Gerät. Wie alle solche 
Geräte kennt er zwei Zustände: Strom an und Strom aus. 
Jedes seiner Teile arbeitet mehr oder weniger nach diesem 
Prinzip. Dazwischen gibt es nichts. Man kann einen Schal¬ 
ter nicht halb anschalten. Den Zustand »kein Strom« be¬ 
zeichnet man mit Null, den anderen »Strom an« (oder La¬ 
dung vorhanden) mit Eins. Dieses nennt man die kleinste 
Informationseinheit oder auch »Bit«. Das Wort kommt von 
»binary digit«, was soviel heißt wie »binäre Ziffer«. 

Für ein Bit gibt es also zwei Zustände (0 oder 1). Nehmen 
wir nun mal zwei Bit, dann sehen wir folgende 
Kombinations-Möglichkeiten: 

00 1. Kombination 
01 2. Kombination 

10 3. Kombination 

11 4. Kombination 

Das sind dann 2 * 2 = 4 Zustandskombinationen. 

Damit lassen 

3 Bit 2 3 = 8 Varianten 

4 Bit 2 4 = 16 

5 Bit 2 5 = 32 

6 Bit 2 6 = 64 

7 Bit 2 7 = 128 und 

8 Bit 2 8 = 256 

Kombinationen zu. 

Nach bestimmten Rechenregeln kann man jeder Bit-Zu¬ 
sammenstellung auch eine Zahl zuordnen. Die zu so einer 
Zahl gehörende Bit-Kombination nennt man Binärzahl. 

Um das Ganze übersichtlicher zu gestalten, geben wir ei¬ 
nigen Gruppen von Bits (egal, welche Zustände bei ihnen 
herrschen, also ob sie nun 0 oder 1 enthalten) auch Namen. 
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Eine Gruppe von vier Bit wird meistens ein Nibble genannt. 
Zwei solcher Nibbles oder acht Bit werden zusammenge¬ 
faßt unter dem Begriff Byte. Da haben wir es also, das Byte. 

Weiter oben haben wir festgestellt, daß man acht Bit zu 
256 verschiedenen Kombinationen zusammenstellen 
kann. Jede Kombination entspricht einer Zahl. Deswegen 
kann ein Byte 256 verschiedene Zahlen enthalten, nämlich 
0 bis 255. Alles, was wir durch POKE-Kommandos einge¬ 
ben, geht in ein Byte (deswegen meldet der Computer ei¬ 
nen »ILLEGAL QUANTITY ERROR«, wenn wir andere Zah¬ 
len als solche zwischen 0 und 255 einzuPOKEn versuchen) 



v/~V 



o 



0 



1 

7 

TT 

Hallo, ich bin ein Bit 
und sehe entweder so: 

oder so aus: 



und alles, was wir durch PEEK erhalten können, ist eben¬ 
falls der Inhalt eines Byte. Glücklicherweise übernimmt 
auch hier der Interpreter die Übersetzung in das System 
der Binärzahlen und umgekehrt. 

In unseren Computer passen genau (ohne die ROM- 
Bausteine) 65536 solche Bytes hinein. Das sind schon wie¬ 
der unüberschaubar viele, weswegen man auch hier einige 
Einteilungen vornimmt. 

Fuges und »Kilo«-Bytes 


»Kilo«-Bytes sind eigentlich keine solchen. Kilo abgekürzt 
»k«, steht immer für 1000 mal etwas. Also 1 km sind 1000 
mal 1 Meter, 1 kg sind 1000 Gramm und so weiter. Bei den 
so beliebten »Kilobytes« ist das anders: So nennen nämlich 
viele in der Computer-Umgangssprache eine Menge von 
2'° Bytes. Und 2 10 sind 1024. Deswegen kürzt man diesen 
Begriff auch nicht mit dem kleinen »k«, sondern mit dem 
großen »K« ab. Und deswegen ist der Ausdruck »Kilobyte« 
falsch. Exakt spricht man es »Ka-Byte« aus. Nochmal also: 
1000 Byte = 1 kByte (»Kilobyte«), aber 1024 Byte = 
1 KByte (»Ka-Byte«), 

Und wenn Sie nun mal 65536 durch 1024 teilen, dann 
sehen Sie, daß in unseren Computer 64 KByte hineinpas¬ 
sen. Deswegen heißt er auch Commodore 64. Wenn je¬ 
mand sagt, ein Programm sei 28 K lang, dann sollte er wis¬ 
sen, daß er eigentlich meint, es sei 28 KByte lang, was 28 
x 1024 = 28672 Byte entspricht oder aber 28,672 KByte. 


1 024 Byte sind immer noch etwas unhandlich. Wenn wir 
diese Menge durch 4 teilen, dann erhalten wir 256 Byte. Ge¬ 
nau diese Anzahl bildet eine »Page«, was von dem engli¬ 
schen Wort für »Seite« herrührt. Page ist allerdings weniger 
die Bezeichnung für genau 256 Byte (sagt man aber auch 
manchmal), sondern ein Ordnungsprinzip wird damit aus¬ 
gedrückt. Wenn man nämlich alle Bytes im Computer 
durchnumeriert (von 0 bis 65535) und dabei immer so 
zählt, daß jeweils 256 davon eine Page bilden, dann erhält 
man 256 Pages zu je 256 Byte. 256 x 256 ergibt dann wieder 
65 536. Diese Pages tragen dann - wie in einem Buch - Sei¬ 
tenzahlen, und mit Page 0 (Adressen 0 bis 255), der soge¬ 
nannten »Zero«-Page, fängt unser Computer an. 


Die Zeropage 


Diese Zeropage ist einer von den RAM-Bereichen, die 
der Computer für seine Notizen reserviert hat. Das obere 
Viertel unseres Bildschirmes hat diese Page vorhin beim Li- 
sting 1 wiedergegeben und ein Zeichen dabei entsprach 
genau einem Byte. 

Beim Wort Vektor denken vielleicht einige von Ihnen mit 
mehr oder weniger leichtem Schaudern an den Mathema¬ 
tik- oder Physik-Unterricht in der Schule. Damit hat der Vek¬ 
tor, den wir im Computer finden, aber wenig gemein. 

Im Abschnitt über die CPU haben wir gesehen, daß dort 
Daten eingehen, verarbeitet und schließlich bis in die ent¬ 
ferntesten RAM-Bereiche unseres Computers gesandt 
werden. Außerdem wissen wir (oder Sie haben das jeden¬ 
falls inzwischen sicher bemerkt), daß das Byte genau der 
»Happen« ist, der dem Computer - also auch der CPU - 
mundgerecht verabreicht werden kann (beispielsweise in 
POKc-Befehlen). Drittens - und jetzt kommt das Problem 
-gibt es 65536 Byte im C64. Die CPU muß oft Daten an ei¬ 
ne Speicherzelle senden, deren Adresse höher ist als 255 
(also das Maximum, das mit einem Byte darstellbar ist). 
Weil aber ein 256-Byte-Computer (0,25 KByte) doch ein we¬ 
nig kläglich wäre, hat man sich da etwas einfallen lassen. 
Die Adressen werden in zwei Bytes aufgeteilt und einzeln 
gelesen. Durch eine bestimmte Technik des Assembler¬ 
programms werden sie zu einer Zahl größer als 256 verkop¬ 
pelt. Erinnern Sie sich noch daran, daß mit acht Bit (also 1 
Byte) 2 8 = 256 Kombinationen erreichbar waren? 2 Byte - 
also 16 Bit - sind dann demzufolge 2 16 Kombinationen, 
was exakt 65536 Möglichkeiten eröffnet. 

Wie kann man nun herausfinden, wie beispielsweise die 
Zahl 50000 in 2 Byte zerlegt wird, so daß der Computer sie 
richtig verwendet? Natürlich haben auch diese 2 Byte wie¬ 
der Namen. Das eine heißt MSB und das andere LSB. SB 
kommt dabei immer von »Significant Byte«, was soviel be¬ 
deutet wie »wichtiges Byte«. »M« steht für »Most«, also »am 
meisten« und »L« ist die Abkürzung für »Least«, also »am 
wenigsten«. Wir haben also ein höherwertiges und ein nie¬ 
derwertiges Byte. 
























GRUNDLAGEN 


C64 


Das MSB gibt die Pagenummer der Adresse an. Man er¬ 
hält diese Num'mer durch Teilen der Adresse mit 256 und 
Weglassen des Restes. Nehmen wir zum Beispiel die Zahl 
50000, dannTechnet man: 

MSB = 50000/256 = 195 Rest 80 
Dieser Rest ist das LSB. 50000 ist dann das 80. Byte auf 
Page 195. Allgemein kann man sowas ja seinen Computer 
rechnen lassen. Wenn also die Zahl Z in ein MSB und ein 
LSB aufgespalten werden soll, erreicht man das mit dieser 
Programmzeile: »msb=int( z/256 ):lsb=z-256*msb« 

Anders herum: Wenn eine Zahl als MSB und LSB vor¬ 
liegt, kann man sie so berechnen: 

Z=256 * MSB + LSB 

Wozu das alles? Solche Byte-Paare nennt man Vektoren 


und die werden vom Computer im RAM gespeichert. Und 
wenn etwas im RAM steht, kann man es durch POKE-Be- 
fehle ändern, vorausgesetzt man weiß, wie so ein Vektor 
umgerechnet werden muß. 

In solchen Vektoren sind allerhand wichtige und interes¬ 
sante Dinge zu finden. Im weiteren Verlauf dieses Kurses 
werden wir uns damit noch beschäftigen. Man kann zum 
Beispiel durch Umschreiben eines Vektors Speicherberei¬ 
che schützen und vieles mehr. 

Die Helfer der CPU 


Auch die tüchtigste Zentrale - wie unser Mikroprozessor 
6510 - ist ohne die wirkungsvolle Mitarbeit weiterer Organe 
hilflos. Das können Sie leicht feststellen, wenn Sie diese al¬ 
le abschalten. Wir haben dann nur noch die CPU und 64 
KByte RAM vor uns. Bevor Sie aber den dazu nötigen Be¬ 
fehl »P0KE1,PEEK(l) AND248« eingeben, sollten Sie alle Da¬ 
ten und Programme auf Kassette oder Diskette speichern, 
denn danach ist unser Computer scheintot, und nur noch 
durch Aus- und wieder Einschalten erwecken wir ihn zum 
gewohnten Leben. 

Was macht uns den Verkehr mit unserem Computer 
überhaupt erst möglich? Weiter oben haben wir einiges da¬ 
von schon erwähnt. Als 8 KByte umfassenden Baustein ha¬ 
ben wir da zunächst den Basic-Interpreter, der alle unsere 
Wünsche, die wir in Basic dem Computer mitteilen, in die 
der CPU allein verständliche Sprache aus Nullen und Ein¬ 
sen übersetzt. Es handelt sich dabei um ein ROM, in dem 
ein Programm in Maschinensprache unveränderbar ge¬ 
speichert ist. Man nennt sowas auch Firmware, weil es Soft¬ 
ware ist, die vom Hersteller fest installiert wurde. 


Zur Begriffserkiärung: Hardware ist alles, was man - ver¬ 
einfacht ausgedrückt - am Computer anfassen kann, 
Chips, Platinen und so weiter. Software nennt man die Pro¬ 
gramme. 

Ein zweiter, ebenfalls 8 KByte umfassender ROM-Baustein 
enthält das Betriebssystem unseres Commodore, Kernel 
genannt. Auch hier handelt es sich um Firmware und eine 
ihrer Aufgaben, nämlich die Abfrage der Tastatur, haben 
wir weiter oben schon erwähnt. Andere sind beispielsweise 
die Organisation der Datenübergabe an die Datasette oder 
den Bildschirm, das Weiterstellen der internen Uhren, das 
Initialisieren nach dem Einschalten und vieles mehr. 

An weiterer Firmware finden wir in unserem C64 das 
Zeichen-ROM, welches, auf 4 KByte verteilt, alle Zeichen, 
die unser Computer darstellen kann, als Muster enthält. 
Aus diesem Speicher werden dann beispielsweise Buch¬ 
staben durch ein im Betriebssystem enthaltenes Pro¬ 
gramm herauskopiert und an eine festgelegte Bildschirm¬ 
adresse übertragen. 

Harte Sache 


Zur Ausführung einer solchen Übertragung bedarf es 
nicht nur der Programme beziehungsweise der Daten, die 
wir in den drei beschriebenen Bausteinen als Firmware 
kennengelernt haben, sondern auch bestimmter Instru¬ 
mente, die alle damit zusammenhängenden Anweisungen 
in die Tat umsetzen. Das geschieht im Commodore 64 
durch vier Bausteine: CIA 1, CIA 2, SID und VIC-ll-Chip. 

Fangen wir mit dem letzten an: VIC (so heißt übrigens im 
englischen Sprachraum der VC20, was auf die Bedeutung 
dieses Bausteins hinweist) kommt von »Video Interface 
Control;. ;r«. Dieser Baustein regelt den Verkehr unseres 
Computers mit dem Bildschirm. Er beansprucht genau 1 
KByte an Speicherplatz und verfügt über 47 Register, deren 
Inhalte seine Tätigkeit steuern. Für alle, die grafische Da¬ 
tenverarbeitung betreiben möchten, ist dieser Chip der 
Schlüssel dazu. 

SID ist die Abkürzung von »Sound Interface Device«. Der 
akustische Verkehr mit der Außenwelt wird durch diesen 
ebenfalls 1 KByte großen Baustein gemanaget. 29 Register 
erlauben hier die Funktionssteuerung, die den Commodo¬ 
re 64 zum Synthesizer oder - mit einigen Tricks - zum 
Sprachausgabegerät ummodelt. 

CIA steht für »Complex Interface Adapter«. CIA1 und CIA 
2 sind zwei identische Bausteine, die aber unterschiedliche 
Aufgaben zu erfüllen haben. Beide beanspruchen je 256 
Byte Speicherplatz und sind über ihre 16 Register zu beein¬ 
flussen. Sie führen vor allem die Ein- und Ausgabeoperatio¬ 
nen aus. Dabei ist der CIA 1 zuständig für Tastatur, Joystick, 
Lichtgriffel und Paddies, während sich der CIA 2 um den 
User-Port, die RS232C-Schnittstelle, den seriellen Aus¬ 
gang und die interne Speicherstruktur zu kümmern hat. 
Beide haben außerdem Uhrenfunktionen und regeln das 
sogenannte Interrupthandling (dazu kommen wir später). 

Stellen wir also fest, daß alle diese Helfer unserer CPU 
insgesamt 22,5 KByte Speicherplatz belegen. Dazu kom¬ 
men noch 1 KByte Bildschirmfarbspeicher und 0,5 KByte, 
die von Copimodore für Erweiterungen freigehalten wer¬ 
den. Wenn Sie den C64 einschalten, dann meldet er sich 
unter anderem mit »64 K RAM SYSTEM«. Da kann aber 
doch etwas nicht stimmen, werden Sie sagen, wenn Sie bis 
hierher aufmerksam mitgelesen haben. Etwas weiter oben 
haben wir festgestellt, daß unsere Zentraleinheit Zugriff zu 
allen - auch den entferntesten - Adressen hat. Dazu ver¬ 
wendet sie den Trick mit dem Aufteilen einer »Anschrift« auf 
zwei Byte und konnte so exakt 65536 Adressaten erreichen, 
also 64 KByte. Nach Adam Riese summieren sich aber 64 



Bild 1. Die Speicherstadt in Ihrem Computer 
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KByte RAM und (etwas vereinfacht) 22,5 KByte ROM zu 
insgesamt 86,5 KByte Speicherraum, den es zu adressie¬ 
ren gilt. Das ist mittels 2 Byte Anschriftentext aber nicht 
möglich. Diesen scheinbaren Widerspruch werden wir 
gleich auflösen. Dazu müssen wir aber unseren Speicher 
noch etwas genauer untersuchen. 


Die Speicherstadt 


Stellen Sie sich eine lange Straße vor mit 65536 aneinan¬ 
dergereihten Häusern (von Hausnummer 0 bis Hausnum¬ 
mer 65535, wie in Bild 1). , 

Dies entspricht unserem Speicher. Jedes Haus (Byte) ist 
ebenerdig und hat acht Zimmer (Bits). Wie eine Stadt in 
Stadtteile unterteilt ist, finden wir in dieser Speicherstadt 
die Einteilung in Pages. Ähnlich wie es in Städten ein Hand¬ 
werkerviertel und ein Geschäftsviertel und so weiter gibt, 
sind auch hier manchen Pages spezielle Aufgaben zuge¬ 
teilt. Die wichtigste davon ist die Zeropage, auf der sich die 
CPU beziehungsweise das Betriebssystem Notizen ma¬ 
chen. Auch die Pages 1 bis 3 (also bis Adresse 1023) dienen 
ähnlichen Zwecken. Ab Page 4 bis inklusive Page 7 liegt der 
Bildschirmspeicher unseres Computers. Er entspricht ge¬ 
nau dem, was auf dem Fernsehbild zu sehen ist. Jedes Zei¬ 
chen wird dabei durch einen POKE-Code vertreten. Die Zu¬ 
ordnung der einzelnen Adressen zu den Bildschirmpositio¬ 
nen kann man aus dem Handbuch (Seite 138) entnehmen, 
ebenso wie die POKE-Codes (Seite 133). Packen wir also 
in Adresse 1024 eine 1 hinein durch »POKE 1024, l«, dann 
erscheint in der linken oberen Bildschirmecke ein »A«. Bei 
Ihnen erscheint kein »A«? Dann fahren Sie mal mit dem 
Cursor an die Stelle und Sie erkennen den Buchstaben. 
Den Commodore 64 gibt es momentan mit mindestens 
zwei verschiedenen Versionen des Betriebssystems. Bei 
der älteren muß man außer dem Bildschirmcode in den 




Bild 2. Die Speicherarchitektur des C64 auf einen Blick 


Bild 3. Die Aufteilung der Ein- und Ausgabebausteine 

Bildschirmspeicher auch noch einen Farbcode in die ent¬ 
sprechende Bildschirmfarbspeicherstelle geben. Diese 
kann man ebenfalls dem Handbuch entnehmen (Seite 
139). Hier braucht man also noch den Befehl »POKE 
55296,1«, um ein weißes »A« zu erzeugen. Die neuere Ver¬ 
sion macht den Farbcode-POKE überflüssig. Nur wenn wir 
eine andere Farbe als die vorgegebene möchten, müssen 
wir den neuen Farbcode in den Bildschirmspeicher 
POKEn. 

Der Bildschirmspeicher erfordert genau 25 x 40 = 1000 
Byte. Von den 1 024 Byte (4 Pages) sind also noch 24 Byte 
frei, die teilweise Verwendung finden als Sprite-Zeiger. 
Doch dazu kommen wir erst später. Ab Page 8 (Adresse 
204b; haben wir volle Verfügungsgewalt über den Speicher 
für Basic-Programme und Daten. 

Etwas Neues passiert ab Adresse 
40960, dem Ende unseres Basic-Spei- 
chers. Von dieser »Hausnummer« an, 
bis 49151, haben die Gebäude der 
Speicherstadt eine zusätzliche erste 
Etage. Zu ebener Erde liegt weiterhin 
RAM vor, im ersten Stock aber ROM, 
und zwar der 8 KByte große Basic-In- 
terpreter (siehe Bild 2). 

In den nächsten 4 KByte finden wir 
wieder nur RAM. Dieser Bereich von 
49152 bis 53247 wird häufig für Ma¬ 
schinenprogramme genutzt, weil hier 
nicht die Gefahr des unabsichtlichen 
Überschreibens durch Basic- 
Programme besteht. Ab 53248 sind 
die »Byte-Häuser« sogar mit zwei Eta¬ 
gen versehen. Im Erdgeschoß liegt 
weiterhin RAM, in der ersten Etage 
sind die Ein- und Ausgabe-Bausteine 
angesiedelt und oben im zweiten 
Stockwerk breitet sich das Zeichen- 
ROM aus. Die Belegung im ersten Ge¬ 
schoß durch die Ein- und Ausgabe- 
Bausteine ist in Bild 3 zu sehen. 

Dabei belegt der VIC-ll-Chip die 
Adressen von 53248 bis 54271, der 
SID-Chip die von 54272 bis 55295, der 
Bildschirmfarbspeicher die von 55296 
bis 56319, der CIA 1 liegt von 56320 bis 
56575, der CIA 2 von 56576 bis 56831 
und der Bereich von 56832 bis 57343 
ist leer. 
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Ab Adresse 57344 bis zum Speicherende haben wir es 
dann wieder mit einstöckigen »Byte-Häusern« zu tun, in de¬ 
ren Erdgeschoß RAM und in deren erster Etage das 
Betriebssystem-ROM wohnt. 

Jetzt können wir an die Lösung des Rätsels gehen, wieso 
unsere CPU anscheinend mehr als 64 KByte an Hausnum¬ 
mern adressieren kann. Wie Sie bei der Wanderung durch 
die Speicherstadt bemerkt haben werden, sind es ja nur 
65536 Häuser, die zu adressieren sind. Die Frage ist jetzt 
nur noch, woher die CPU weiß, in welche Etage bei den 
mehrstöckigen Byte-Gebäuden eine Nachricht gelangen 
soll, beziehungsweise aus welcher Etage eine Meldung zu 
holen ist. Dazu verwendet unser Computer die Speicher¬ 
stelle 1. In drei von den acht Bit-Zimmern dieses Byte- 
Hauses liegt die Information, welche Etage in welchen 
Speicherbereich gerade zugänglich ist. Es gibt für drei Bit 
(Bit 0 bis 2) ja 2 3 = 8 Kombinationsmöglichkeiten. In Bild 4 
sehen Sie die Auswirkung der verschiedenen Inhalte von 
Bit 0, 1 und 2 dieser Speicherstelle. 

Speicher mit Etagen 


ln Bild 4 ist auch jeweils der Dezimalwert der Bits 0 bis 
2 angegeben (in Spalte B). Durch Eingabe des Basic- 
Befehles »poke i, (peek (i) and 248) or b«, wobei B 
dann den entsprechenden Wert annimmt, kann der Spei¬ 
cherzustand gesteuert werden. Allerdings gilt es dabei 
noch ein paar Feinheiten zu beachten, damit der Computer 
nicht abstürzt. Auch kann man diese veränderten Spei¬ 
cherkonstellationen nur selten von Basic aus sinnvoll nut¬ 
zen. Die unterschiedliche Belegung der Speicherstelle 1 
wird auch vom Betriebssystem wahrgenommen und da¬ 
durch ist unsere CPU in der Lage, festzustellen, welche 
Etage gerade für den Zugriff offensteht. Mit dieser Lösung 
des Rätsels sind wir schon mitten in der Zeropage (Adres¬ 
sen 0 bis 255) gelandet, die uns nun weiter beschäftigen 
soll. 

Wenn Sie das Handbuch zum Commodore 64 auf Seite 
160 aufschlagen, finden Sie eine Liste der Belegung der 
Zeropage und ab Seite 163 eine der Pages 1 bis 3. Deshalb 
soll hier nicht noch mal diese Tabelle abgedruckt werden. 
Außer einzelnen Werten und Vektoren finden sich hier so¬ 
gar ganze Maschinenprogramme. 

Wir werden hier nur diejenigen Adressen genauer unter¬ 
suchen, die Verwendungsmöglichkeiten für uns im Rah¬ 
men von Basic bieten. Außer der schon behandelten Spei¬ 
cherstelle 1 sind die Adressen 43 bis 56 von sehr großem 
Interesse. Hier wird nämlich der Basic-Speicher organi¬ 
siert. Zunächst soll uns nur der Vektor 43/44 beschäftigen. 
Um die anderen aus diesem Bereich zu verstehen, brau¬ 
chen wir noch mehr Informationen über den Aufbau von Ba- 
sic-Programmen im Speicher. 43/44 ist der Vektor, der auf 
den Anfang eines Basic-Programmes zeigt. Wenn Sie mit 
»PRINT PEEK (43), PEEK (44)« den Computer danach fra¬ 
gen, dann antwortet er im Normalfall mit den Angaben »1« 
und »8«. Das sind-in dieser Reihenfolge-das LSBunddas 
MSB der Startadresse, und wenn Sie sich die Umrech¬ 
nungsformel: Z = 256 x MSB + LSB zunutze machen, 
dann erhalten Sie: Z = 256 x 8 + 1 = 2049. Das ist eine 
Speicherstelle weiter, als die, die wir nach dem Durchge¬ 
hen des gesamten Speichers erwartet hatten. In der Spei¬ 
cherstelle 2048 liegt eine Null, womit dem Interpreter der 
Anfang noch etwas deutlicher gemacht wird. 

Wie wir weiter oben schon erwähnt haben, kann man sol¬ 
che Vektoren im RAM nicht nur lesen, sondern auch verän¬ 
dern. Das soll an einem Beispiel demonstriert werden: 
Nehmen wir an, unser Basic-Speicher-Anfang soll verlegt 
werden nach Speicherstelle 12288. Dann müssen wir zu¬ 
nächst die Null von 2048 nach 12288 verschieben, und 



Bild 4. So wirken sich Veränderungen der Bits 0 bis 2 von 
Speicherstelle 1 auf dem Speicherzustand aus 


zwar mit »POKE 12288,0«. Als nächstes berechnen wir das 
LSB und das MSB von 12289: MSB=INT (12289/256)=INT 
(48.003906)=48 und LSB=12289-256x48=1. Nun POKEn 
wir LSB und MSB des neuen Basic-Anfanges nach 43 und 

44 (»POKE 43,l:Poke 44,48«). 

Damit zum einen der so definierte Speicherraum leergefegt 
wird und zum anderen auch einige andere Vektoren in die 
richtige Stellung kommen, wird abschließend noch NEW 
eingegeben (»new«). 

Wozu benötigt man so etwas? Sehr häufig verwendet 
man Basic- und Maschinencode-Programme gemeinsam. 

Geschützte Bereiche 


Sei es, daß man nur eine kleine Routine - beispielsweise 
zum Sortieren - in Maschinensprache vom Basic-Pro- 
gramm her aufruft oder daß man ein Basic-Rahmenpro- 
gramm verwendet, um ein komplexes Maschinencode-Pro¬ 
gramm zu bedienen, immer braucht man einen geschütz¬ 
ten Platz für das Maschinenprogramm. Zwar kennen Sie ja 
inzwischen den RAM-BsrelGh von 49152 an, der für viele 
solche Zwecke dient. aber genau darin liegt oft das Pro¬ 
blem. Wenn Sie nun beispielsweise ein großes Assembler¬ 
programm in diesem oberen Speicherbereich ständig prä¬ 
sent haben wollen, dann muß die neue Assembler-Routine 
ein anderes Plätzchen finden. Ich lege sie in solchen Fällen 
meist an das Ende des Basic-Speichers. Man kann sie aber 
ebensogut ganz an den Anfang packen und den Basic-Pro- 
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gramm-Start dahinter plazieren. Eine andere Verwendung 
sind Sprite-Daten, die vor dem Basic-Programm liegen sol¬ 
len oder ein Grafik-Bildschirm und so weiter. 

In den Speicherzellen 59/60 wird immer die letzte bear¬ 
beitete Zeilennummer festgehalten. Wenn man durch 
RUN/STOP ein Programm anhält, meldet unser Computer 
diese Zahl in der Mitteilung »BREAK IN...«. Sollten Sie nach 
einer solchen Unterbrechung beispielsweise einige Zwi¬ 
schenrechnungen im Direktmodus ausgeführt haben, so 
daß die Zeilennummer nicht mehr auf dem Bildschirm zu 
sehen ist, dann können Sie sie durch »PRINT PEEK (59) + 
256*PEEK (60)« wieder nachlesen. 

Viele nützliche Adressen 


ln den Bytes 63/64 wird die jeweils aktuelle DATA-Zeilen- 
nummer gespeichert, wohingegen 65/66 die Adresse des 
aktuellen DATA-Elementes enthält. 

In Byte 144 finden wir die Statusvariable ST, die auch von 
Basic her abgefragt werden kann. Speicherstelle 152 ent¬ 
hält die Anzahl offener Files. Man darf höchstens 10 Files 
gleichzeitig offenhalten. Versucht man mehr zu öffnen, er¬ 
folgt ein Programmabbruch und die Meldung »TOO MANY 
FILES ERROR« wird ausgegeben. Um das zu vermeiden, 
empfiehlt es sich in manchen Programmen, die dieses Risi¬ 
ko eingehen, zuvor eine Abfrage des Inhaltes von Byte 152 
durchzuführen, zum Beispiel mit »IF peek (152)=io then 
PRINT...«. 

Byte 157 trifft die Unterscheidung, ob sich unser Compu¬ 
ter gerade im Direktmodus (dann enthält es 128) oder im 
Programmodus (dann enthält es 0) befindet. 

Ein Unterschied, der ins Auge fällt, ist das Verhalten des 
Computers bei Systemmeldungen. Im Program modus wer¬ 
den diese unterdrückt (kein SEARCHING oder LOADING 
und so weiter). Wenn Sie also wünschen, daß auch inner¬ 
halb eines Programmes diese Meldungen auftreten, dann 
stellen Sie durch »POKE 157,128« diese Meldungen an 
oder wenn Sie die Meldungen im Direktmodus stören, 
durch »POKE 157,0« aus. Speicherstelle 184 enthält die 
Nummer des zuletzt geöffneten Files. 

In Speicherstelle 185 findet man - in modifizierter Form 
- die aktuelle Sekundäradresse, die in diesem Fall den Ka¬ 
nal angibt. Die Veränderung der eigentlichen Sekundär¬ 
adresse kann durch folgende Abfrage aufgefangen wer¬ 
den: »Sekundäradresse = PEEK (185) AND 159«. Die Ge¬ 
räteadresse des zuletzt eröffneten Files findet man in Spei¬ 
cherzelle 186. Im Byte 198 befindet sich die Anzahl der gülti¬ 
gen Zeichen im Tastaturpuffer. Das ist ein Speicherbereich, 
der maximal zehn Tastendrücke Zwischenspeichern kann, 
wenn sie aus irgendwelchen Gründen nicht sofort verar¬ 
beitbar sind. Man kann diese Anzahl variieren, sollte aber 
nie größere Zahlen als 10 eingeben, weil dadurch Störun¬ 
gen des Systems ausgelöst werden könnten. Einige An¬ 
wendungen werden wir zusammen mit dem Tastaturpuffer 
behandeln. Mit dem WAIT-Befehl läßt sich das umständli¬ 
che »GETA$:IFA$= '"THEN...« in folgender Weise vereinfa¬ 
chen: »WAIT 198,1: POKE 198,0« 

Speicherstelle 199 enthält ein Flag, das anzeigt, ob re- 
vers oder normal gedruckt wird. Ist der Inhalt von 199 eine 
1, dann ist der Reversmodus an-, bei 0 ausgeschaltet. Spei¬ 
cherstelle 203 enthält einen Index, der entsprechend der 
gerade gedrückten Taste auf den dazugehörigen Ort der 
Tastaturdecodierungstabelle weist. Dieser Index ist weder 
mit dem POKE-Code noch mit dem Commodore-ASCII 
identisch. Durch »PEEK (203)« kann dieser Wert überprüft 
und dann darauf reagiert werden. Welche Taste zu wel¬ 
chem Code gehört, können Sie aus der Tabelle 1 entneh¬ 
men. 


Die Speicherstellen 204 und 207 sind verwendbar, um 
auch bei GET-Abfragen einen Cursor auftreten zu lassen. 
In Byte 204 wird durch den Wert 0 das Blinken des Cursors 
ein-, durch 1 ausgeschaltet. Weil man aber nicht genau Vor¬ 
hersagen kann, ob beim Ausschalten gerade der Cursor 
sichtbar war - und dieser dann als heller Block erhalten 
bleiben würde - kann man ein Flag in 207 auf 0 setzen, um 
diesen Block verschwinden zu lassen. Das sollte vor dem 
Ausschalten des Cursorblinkens geschehen. Im folgenden 
Programmbeispiel ist so eine Sequenz gezeigt: 

10 PRINT CHR$ (147)"BITTE EINGABE!"; 

20 POKE 204,0:POKE 198,0 
30 WAIT 198,1:GETA$ 

40 POKE 207,0:POKE 204,1 
50 .... 

Die Speicherstellen 211 und 214 enthalten die aktuelle 
Cursor-Position. 211 gibt dabei die Spalte (0 bis 39), 214 die 
Zeile (0 bis 24) an. In Zusammenhang mit einer Betriebssy¬ 
stemroutine kann man aber auch in diese Speicherzellen 
Werte eingeben, um den Cursor an bestimmte Positionen 
zu setzen. In meinen Programmen habe ich zu diesem 
Zwecke immer ein kleines Unterprogramm eingebaut: 

10 POKE 211,SP:POKE 214,Z:SYS 58640:RETURN 

Das benütze ich dann immer mit Angabe des Spal- 
ten(SP)- und Zeilenwertes (Z) und erspare mir damit den 
Wust an Cursorsteuerbefehlen oder CHR$-Anweisungen. 

Interessant ist auch der Vektor 243/244, der die zur ak¬ 
tuellen Cursor-Position gehörige Bildschirmfarbspeicher- 
zelle angibt. Mit unserer Formel kann diese dann einfach 
berechnetwerden:»Farbzelle = PEEK(243) + 256xPEEK 
(244)«. 

Damit wären wir am Ende der Zeropage angelangt. Le¬ 
diglich die wichtigen Adressen 43 bis 56 bedürfen noch ei¬ 
ner u < maueren Erklärung: diese haben nämlich mit der 
Speicherung eines Basic-Programms und aller damit ver¬ 
bundenen Größen zu tun. 

Die Speicherstellen 43 bis 56 enthalten Notizen unseres 
Computers zur Verwaltung von Basic-Programmen. Wir 
wollen uns das einmal genau ansehen. Schalten Sie bitte 
Ihren 64 aus und wieder an, damit wir den Speicher im 
Grundzustand vor uns haben. Dann geben Sie ein: 
»PRINT PEEK (43), PEEK (44)«. Auf dem Bildschirm steht als 
Antwort: »1 8«. 

Die Speicherstellen 43 und 44 bilden einen Vektor, der 
auf den Beginn des Basic-Speichers zeigt. Die Zahlen sa- 



Tabelle 1. Codes, die in der Speicherstelle 203 bei entspre¬ 
chendem Tastendruck zu finden sind 
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gen uns, daß wir es mit der ersten Speicherstelle der Page 
8 zu tun haben, denn mit der Formel 
»ERGEBNIS = 256 x MSB+LSB = 256x8 + 1 = 2049« 
ergibt sich 2049. Aus der Speicheraufteilung des C64 ist 
uns 2048 noch als Basic-Startadresse bekannt. In dieser 
Speicherstelle steht eine Null, so daß das erste Basic-Pro- 
gramm-Byte tatsächlich erst in 2049 zu finden ist. 

Jetzt machen wir uns die Sache etwas bequemer. Lö¬ 
schen Sie den Bildschirm und geben Sie dann im Direktmo¬ 
dus - also ohne Programmzeilennummer - ein: 

A=45:PRINT PEEK(A),PEEK(A+1),PEEK(A)+256*PEEK(A+1). 

Nach dem Return finden wir auf dem Bildschirm: 

»3 8 2051«. 

Das ist das Ende des Basic-Programms und gleichzeitig 
der Anfang des Variablenspeichers. Sie werden sich dar¬ 
über wundern, daß wir ja gar kein Programm im Speicher 
stehen haben und trotzdem 2 Byte verbraucht worden sind. 
Dieses Rätsel werden wir lösen, sobald wir uns näher mit 
der Struktur eines Basic-Programms im Speicher befas¬ 
sen. 

Wie Sie sehen, fangen die Variablen direkt hinter dem 
Basic-Programm an. Hier findet man die sogenannten ein¬ 
fachen Variablen, wovon es vier Typen gibt: 


Normale Gleitkommavariablen 

zum Beispiel A 

Integer-Variablen 

zum Beispiel B% 

String-Variablen 

zum Beispiel C$ 

und etwas aus dem Rahmen 


fallend, Funktionen 

zum Beispiel FND(X) 


Übrigens liegt in der Tatsache, daß die Variablen direkt 
hinter dem Programm zu finden sind, auch der Grund für 
ein zunächst etwas unverständliches Verhalten unseres 
Computers: Wenn Sie schon einmal ein Programm durch 
»STOP« oder durch die »RUN/STOP-RESTORE«-Tasten an¬ 
gehalten und danach eine Zeile oder Anweisung geändert 
haben, konnten Sie es nicht mehr mit »CONT« weiterlaufen 
lassen. Weshalb? Weil durch die Programmänderung eine 
Verlängerung stattgefunden haben könnte, die die ersten 
Variablen oder Teile davon unter Umständen überschrie¬ 
ben hätte. Deswegen ist dieses »CONT« vorsichtshalber ge¬ 
sperrt worden. Damit schließt man eventuell schwer festzu¬ 
stellende Fehler aus. 

So verwaltet der C64 Basic-Prograntme 


Auf Ihrem Bildschirm steht hoffentlich noch die vorhin ein¬ 
gegebene Anweisung im Direktmodus. Dann fahren Sie 
jetzt mit dem Cursor hoch und löschen Sie die Ergebnisse. 
Dann fahren Sie in die Zeile, in der das A definiert wurde. 
Ersetzen Sie die Zahl 45 durch 47 und drücken Sie RE¬ 
TURN. Auf dem Bildschirm finden Sie nun: 

»10 8 2058«. 

Der Vektor 47/48 weist auf das Ende der Tabelle der einfa¬ 
chen Variablen und gleichzeitig auf den Anfang der indi¬ 
zierten Variablen, welche man häufig auch Arrays oder Fel¬ 
der nennt. Eigentlich sollte im Leerzustand dieser Zeiger 
auch auf die Speicherstelle 2051 deuten. Wir haben aber 
in unserer Direktanweisung eine Variable A definiert. Die ist 
nun in die Variablentabelle eingetragen worden und ver¬ 
braucht - wie wir sehen - genau 7 Byte Speicherplatz. Zwar 
werden wir uns später noch mit dem Aussehen der Varia- 
blen-Einträge befassen, wir können uns aber schon mer¬ 


A 0 

A, 

a 2 

a 3 

A 4 

a 5 

a 6 

a 7 

A s 

a 9 

A 10 

A n 


ken, daß jede Variable diese 7 Byte Speicherplatz bean¬ 
sprucht. Das gilt auch für die Integervariablen, von denen 
sich die oft gehörte Annahme, sie würden weniger Spei¬ 
cherplatz verbrauchen, als eine Ente herausstellt. Setzen 
Sie doch mal in unserer Direktmoduszeile anstelle von »A« 
ein »A%« ein: Das Ergebnis verändert sich nicht. 

Aus der Tatsache, daß die Arrays direkt im Anschluß an 
die einfachen Variablen stehen, kann man eine Verhaltens- 
Maßregel für den Programmierer ablesen. Nehmen wir ein¬ 
mal an, die einfachen Variablen werden in einem Basic- 
Programm nicht eigens definiert, sondern immer automa¬ 
tisch dann, wenn sie gebraucht werden. Außerdem werden 
Arrays verwendet. Kommt also das Programm im Verlauf 
der Abarbeitung beispielsweise an die Variable N, dann 
wird dafür ein Eintrag in die Variablenliste (Anfang ab Vek¬ 
tor 45/46 bis Ende bei Vektor 47/48) vom Basic-Interpreter 
vorgenommen. Sind aber vorher schon Arrays in die Ar- 
ray-Liste (ab Vektor 47/48) eingetragen worden, dann muß 
zuerst der ganze Array-Listen-Block um 7 Byte nach oben 
verschoben werden, um für diese neue Variable N den nöti¬ 
gen Platz zu schaffen. Dies geschieht für jede neue Varia¬ 
ble. Sie können sich vorstellen, daß solch ein Weg nicht ge¬ 
rade zur Beschleunigung eines Programmablaufes bei¬ 
trägt. Man sollte also einfach in den ersten Zeilen eines Pro¬ 
grammes schon alle Variablen definieren. Wenn man von 
einigen noch keine Werte angeben kann, weil die veränder¬ 
lich sind, setzt man sogenannte Dummys ein, also irgend¬ 
welche erfundenen Beträge. 

Die Hauptsache ist ja nur die Vorbelegung aller Listen¬ 
plätze der Variablenliste. Dabei kann man dem Computer 
gleich noch etwas Gutes tun, indem man die am häufigsten 
gebrauchten Variablen ganz an den Anfang setzt. Der Inter¬ 
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A(J4 
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A 2 i 

A22 
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A40 
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A43 

A44 
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A 63 
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Bild 6. So sieht ein zweidimensionales Array aus 

preter muß dann nur immer kurze Teile der Liste beim Auf¬ 
suchen durchforsten. 

Die Arrays, deren Listenbeginn durch den zuletzt be¬ 
trachteten Vektor 47/48 angezeigt werden, sollen zu einem 
späteren Zeitpunkt ausführlich behandelt werden. Hier 
deshalb nur kurz die Übersicht über die drei Typen, die wir 
im Commodore 64 auswählen können: 

Gleitkomma-Arrays zum Beispiel A(N) 

Integer-Arrays zum Beispiel B%(N) 

String-Arrays zum Beispiel C$(N) 

Jeder dieser Typen kann in unterschiedlicher Dimensionie¬ 
rung auftreten: 

eindimensionales Array zum Beispiel A(N) (Bild 5) 
zweidimensionales Array zum Beispiel B(N,M) (Bild 6) 
dreidimensionales Array zum Beispiel C(N,M,0) (Bild 7) 
und so weiter. 



Bild 5. Beispiel für ein eindimensionales Array 
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Bild 7. Struktur eines dreidimensionalen Arrays 

Theoretisch können im Commodore 64 sogar Arrays mit 
256 Dimensionen definiert werden, solange der verfügbare 
Speicherplatz ausreicht. Einen Zeiger auf das Ende der 
Array-Liste finden wir in 49/50. Wenn Sie wieder in unserer 
Direkt-Eingabe das Ergebnisfeld löschen und dann für A 
den Wert 49 einsetzen, dann zeigt der Bildschirm wie vor¬ 
hin: 

»10 8 2058«. 

Weil wir kein Array verwendet haben, ist der Array-Ende- 
Zeiger mit dem Array-Beginn-Zeiger identisch. Etwas Neu¬ 
es erfahren wir, wenn wir für A nun mal 51 einsetzen. Es er¬ 
gibt sich der Ausdruck: 

»0 160 40960«. 

Diese Zahl kennen wir als die Startadresse des Basic-In- 
terpreter-ROMs. Gleichzeitig haben wir hier das Ende des 
normalerweise verfügbaren Basic-Speicherraumes vor 
uns. 51/52 ist aber nicht etwa der Zeiger auf das Ende des 
Basic-Speichers. Vielmehr gibt dieser Vektor Auskunft 
über den Anfang des Stringspeichers. Das kann man leicht 
feststellen. Geben Sie doch mal ein: »A$ = "123456"«. 

Dann löschen Sie das Ergebnisfeld unserer Direktzeile 
und fragen Sie erneut nach dem Inhalt des Vektors 51/52 
durch Hochfahren des Cursors zur Direktzeile und Drücken 
von RETURN. Auf dem Bildschirm erscheint nun: 

»250 159 40954«. 

Der Vektor ist jetzt sechs Speicherplätze weiter nach un¬ 
ten gerutscht, also für jedes Zeichen unseres Teststrings 
A$ um einen Speicherplatz. Wir sehen daran, daß Strings 
am oberen Ende unseres Basic-Speichers abgelegt und 
neue Strings von da an-abwärts angehängt werden. 51/52 
weist daher auf den jeweils aktuellen unteren Rand des 
Stringspeichers. Zwischen der durch 51/52 angezeigten 
Speicherposition und der 
durch 49/50 definierten 
Array-Obergrenze liegt frei¬ 
er Speicherraum. Beide 
Zeiger wandern im Verlauf 
eines Programmes mit vie¬ 
len Variablen aufeinander 
zu. Wenn ihr Abstand eine 
gewisse Mindestgrenze er¬ 
reicht, tritt die sogenannte 
Garbage-collection (zu 


deutsch: Müll-Sammlung) ein. Nicht mehr benötigte 
Strings werden dabei (etwas vereinfacht) gelöscht und 
noch gültige soweit wie möglich nach oben gerückt. Dann 
klafft wieder freier Speicher zwischen String- und Array-Ta- 
belle. Sollte aber irgendwann auch die Garbage-collection 
keinen freien Speicher mehr schaffen können, dann meldet 
der Computer einen »OUT OF MEMORY ERROR«. 

Der Vektor 53/54 soll uns nicht belasten. Es handelt sich 
um einen Hilfszeiger zur Stringverarbeitung. Viel interes¬ 
santer sind die Speicherplätze 55 und 56 für uns, die nun 
wirklich das Ende des verfügbaren Basic-Speichers enthal¬ 
ten. Steht die Direktzeile noch auf dem Bildschirm? Dann 
ersetzen Sie bitte den A-Wert durch 55 und - nach vorheri¬ 
gem Löschen des Ergebnisfeldes sowie einem RETURN in 
der Direktzeile - sehen Sie den Ausdruck: 

»0 160 40960«. 

Insgesamt sehen Sie in Tabelle 2 eine Zusammenfas¬ 
sung der Namen, Speichernummern und Inhalte all dieser 
Vektoren im Einschaltzustand unseres Commodore 64. 
Bild 8 zeigt Ihnen den Basic-Speicher mit den Zeigern. Hier 
soll ein Programm im Speicher liegen. Wir können aber 
noch mehr tun, als nur diese Vektoren mit PEEK lesen. Hier 
liegt ja RAM vor, das durch POKE-Kommandos veränder¬ 
bar ist. 

Veränderungen am Basic-Speicher 

Folgendes kann man am Basic-Speicher alles ändern: 

1) Herabsetzen des Basic-Speicherendes 

2) Heraufsetzen des Basic-Speicherbeginns 

3) Mehrere Basic-Programme im Speicher gleichzeitig list- 

und lauffähig aufbewahren. 

C;i am häufigsten gestellte Aufgabe ist das Schützen 
des oberen Basic-Speicherbereichs vor dem Überschrei¬ 
ben durch Basic. Zwar bietet der Commodore 64 ab Spei¬ 
cherstelle 49152 (siehe Bild 2) einen 4 KByte großen Spei¬ 
cherraum, der für Maschinencode-Programme oder ähnli¬ 
ches recht gut geeignet ist, trotzdem muß man manchmal 
solche Programme auch in den Basic-Speicher legen. Bei¬ 
spielsweise fangen Modulprogramme meistens bei der 
Speicherstelle 32768 an, was mit einem besonderen Ver¬ 
halten unseres Computers beim Einschalten, aber auch 
beim Reset, zusammenhängt. 

Nehmen wir also an, wir möchten den Speicherraum ab 
32768 (siehe Bild 9) schützen. Dann können wir uns zu¬ 
nächst der inzwischen schon bekannten Formeln bedie¬ 
nen: 

MSB = INT(32768/256) = 128 
LSB = 32768 - 256 X 128 = 0 

Diese Werte müssen wir noch in den Vektor 55/56 schrei¬ 
ben. Normalerweise wäre noch eine Korrektur des String¬ 
vektors notwendig, doch der NEW-Befehl erledigt das für 
uns. Also: 

P0KE 55,0:POKE 56,128:NEW 

Der POKE 55,0 kann auch weggelassen werden, da der 
LSB des Vektors meist sowieso auf Null steht. 

Prinzipiell gibt es zwei Möglichkeiten, die sich durch die 


Commodore- 

Adresse 


Normaler Inhalt 

Bedeutung 

Name 

LSB 

MSB 

LSB 

MSB 

Dezimal 


TXTTAB 

43 

44 

1 

8 

2049 

Basic-Text-Anfang 

VARTAB 

45 

46 

3 

8 

2051 

Variablen-Tabelle Anfang 

ARYTAB 

47 

48 

3 

8 

2051 

Array-Tabelle Anfang 

STREND 

49 

50 

3 

8 

2051 

Array-Tabelle Ende 

FRETOP 

51 

52 

0 

160 

40960 

String-Tabelle Spitze 

MEMSIZ 

55 

56 

0 

160 

40960 

Basic-Spelcher-Ende 


Tabelle 2. Durch diese Zeropage-Vektoren wird ein Basic-Programm organisiert 
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Bild 8. Das normale Basic-RAM mit den Vektoren 

Behandlung der Variablen unterscheiden (siehe dazu Bild 
10 und Bild 11): Bei der ersten Variante werden die Program¬ 
me relativ dicht hintereinander gelegt. Oberhalb des 
letzten Programms ist dann ein gemeinsamer Variablen-, 
Array- und Stringspeicher vorhanden. Das erreicht man so: 

1) Einladen des ersten Programms und über den Vektor 
45/46 feststellen, wo der Programmtext endet. 

2) Die nächste volle Pageadresse 
wählen (diese müssen Sie sich un¬ 
bedingt aufschreiben, sonst finden 
Sie Ihr Programm später nicht 
mehr) und - wie bereits beschrie¬ 
ben - eine Null einPOKEn, sowie 
den Basic-Anfang-Vektor auf diese 
Adresse +1 setzen. 

3) Nächstes Programm laden und wie¬ 
der wie in 1) und 2) geschildert ver¬ 
fahren, bis alle benötigten Pro¬ 
gramme im Speicher liegen. 

4) Automatisch weist nun der 
Programmende-Vektor 45/46 auf 
das Ende des letzten Programms. 

Von dort an werden dann die Varia¬ 
blen und Arrays abgelegt. 

5) Weil Sie glatte Pages als Start¬ 
adressen gewählt haben, genügt 
es, zum Umschalten den jeweils da¬ 
zugehörigen Wert aus Punkt 2 in 
Speicherstelle 44 zu POKEn. 

Die Vorteile dieses Verfahrens lie¬ 
gen in der einfachen Umschaltung 
und der Tatsache, daß man so ziemlich 


viele Programme im Speicher halten kann. Von Nachteil ist 
es, daß Änderungen eines Programmes sehr vorsichtig vor¬ 
genommen werden müssen, damit nicht das nachfolgende 
Programm überschrieben wird. Auch kann man immer nur 
alle Programme zugleich speichern. Außerdem gibt es 
manchmal Situationen, in denen die gemeinsame Nutzung 
eines Variablenspeichers von Nachteil ist. 

Die zweite Variante weist diese Mankos nicht auf, ver¬ 
braucht aber mehr Speicherplatz. Außerdem ist die Um¬ 
schaltung von Programm zu Programm wesentlich um¬ 
ständlicher. Hier müssen nämlich immer alle Vektoren von 
43/44 bis 55/56 umgestellt werden. 

Das Prinzip dieser zweiten Variante ist es, den Basic- 
Speicherraum jedes Programms mit seinen Variablen als 
allein vorhandenen Basic-Speicher zu definieren. Der 
Computer nimmt den gesamten anderen Bereich mit all 
seinen Inhalten nicht mehr wahr. 

Für den Basic-Programmierer ist die Page 1 ganz flott ab¬ 
gehandelt: Da gibt es nämlich nichts Interessantes für ihn 
zu finden. Von Speicheradresse 256 bis 511 befindet sich 
der Prozessorstack, der auch Stapelspeicher genannt 
wird. Ein Eingriff kann hier zu besonders eleganten Abstür¬ 
zen führen. Dieser Prozessorstack und sein Inhalt ist eines 
der empfindlichsten Gebiete unseres Computers und nur 
sehr erfahrene Assembler-Programmierer können ihn oh¬ 
ne Scheu manipulieren. Aber das soll Sie nicht davon ab¬ 
halten, Ihr Glück auch hier durch ein paar »POKEs« oder 
PEEKs zu versuchen. Die Notbremse (Ausschalten des 
Computers) funktioniert ja immer. (Heino Ponnath/kn) 



Bild 9. Oberhalb von Adresse 32768 (Vektor 55/56) ist das Basic-RAM geschützt 




Bild 10. Basic-Programme und Variablen hintereinander 

46 


Bild 11. Programme und Variablen gemeinsam im Speicher 
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Das alles kann der C64 


Endlich steht der heißersehnte C64 auf Ihrem 
Schreibtisch und wartet darauf, in Betrieb ge¬ 
nommen zu werden. Doch was verbirgt sich hin¬ 
ter diesem vielgerühmten Gerät, und was läßt 
sich alles mit ihm anstellen? Der folgende Bericht 
gibt die Antwort auf diese Fragen. 

N un sind auch Sie einer der stolzen Besitzer jenes 
Computers, der seit Anfang 1984 auf dem Computer¬ 
markt für Trubel sorgt. Der Commodore 64, der Nach¬ 
fahre des legendären Volkscomputers VC 20, leitete eine 
neue Computer-Ära ein. Ein Zeitalter, in dem es nun für je¬ 
dermann erschwinglich war, einen leistungsfähigen Com¬ 
puter für sein eigenes Heim zu erstehen. Der Begriff »Ho¬ 
mecomputer« oder »Heimcomputer« war geboren und wur¬ 
de bald zu einer festen Vokabel in der Computerwelt. 



Bild 1. Vizawrite 64: eine bewährte Textverarbeitung 

Obgleich die Computertechnik seit 1984 rasante Ent¬ 
wicklungen erfuhr, ist der vergleichsweise »alte« C64 noch 
immer einer der leistungsfähigsten Computer seiner Preis¬ 
klasse. Zudem steht dem C64-Besitzer eine nahezu un¬ 
übersehbare Anzahl von Programmen und Erweiterungen 
aus allen Bereichen zur Verfügung. 

Ob Sie den C64 beruflich oder privat nutzen, ein begei¬ 
sterter Elektronik-Bastler oder eine Spieler-Natur sind, der 
C64 ist ein Computer für jeden nur erdenklichen Anwen¬ 
dungsfall. Mit insgesamt 64 KByte RAM besitzt er genug 
Speicherplatz, um auch größere Programm-Projekte zu 
verwirklichen. Seine besondere Leistungsfähigkeit zeigt 
der C64 bei der Darstellung von Grafik und der Erzeugung 
von eindrucksvollen Klängen. Zusätzlich sorgt eine Viel¬ 
zahl von Anschlußbuchsen für eine hervorragende Verbin¬ 
dung zur Außenwelt. 

Der Computer sucht Anschluß 


Diese Anschlüsse (Schnittstellen), die sich größtenteils an 
der Rückseite des Gehäuses befinden, haben für den C64 
eine große Bedeutung. Dort wird beispielsweise ein Fern¬ 
seher oder Monitor angeschlossen, so daß Sie mit dem 


C 64 direkten »Blickkontakt« haben. Andere Stecker dienen 
der Verbindung mit weiteren Geräten (Peripherie), die für 
den Computereinsatz erforderlich sind. 

Neben dem Computer selbst benötigen Sie ein Medium, 
das die Programme, die Sie in den C64 eingeben, dauer¬ 
haft speichert, denn sonst sind nach dem Ausschalten des 
Computers alle Daten gelöscht. Eines dieser Geräte ist die 
»Datasette«, ein kleiner Recorder, der es erlaubt, Program¬ 
me, ähnlich wie Musik, auf Kassetten zu speichern. Diese 
kostengünstige Methode der Datenspeicherung ist jedoch 
sehr langsam und vor allem unsicher. Wesentlich teuerer, 
(zirka 300 bis 400 Mark) aber auch komfortabler ist ein Dis¬ 
kettenlaufwerk (Floppystation). Hier werden die Daten nicht 
auf ein Magnetband geschrieben, sondern auf eine dünne 
Magnetscheibe, die Diskette. 

Abgestimmt auf den C64 bietet Commodore die Floppy¬ 
station 1541 an. Besitzer eines C128 werden hingegen ei¬ 
ner Floppy 1571 (ab 570,- Mark erhältlich) den Vorzug ge¬ 
ben. Beide Geräte gestatten das schnelle Laden und Spei¬ 
chern von Programmen und erschließen zudem die Welt 
der professionellen Datenverarbeitung, wie wir bald noch 
sehen werden. Darüber hinaus sind die meisten kommer¬ 
ziellen Programme nur auf Diskette erhältlich. 



Bild 2. Ein Schritt nach links... zwei nach vorn... 
Der C64 steuert einen Roboter. 


Ein weiteres nützliches Peripheriegerät ist schließlich ein 
Drucker, mit dessen Hilfe Texte oder auch Grafikbilder zu 
Papier gebracht werden. Neben Diskettenstationen und 
Druckern gibt es viele weitere Peripheriegeräte für den 
C64, wie etwa Festplattenspeicher oder Plotter. Sie sind je¬ 
doch für den privaten Gebrauch nicht nötig. 

Ein besonderes Merkmal des C 64 oder auch des C128 be¬ 
steht, wie schon erwähnt, in seiner guten Verbindung zur 
Außenwelt. So verfügt er über zwei Schnittstellen (An¬ 
schlüsse), die die Erweiterung des Computers mit diversen 
Platinen und Modulen ermöglichen. Diese Gelegenheit 
nutzten viele Elektronik-Bastler und entwarfen eine Viel- 
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C64 


zahl von Zusatzplatinen, die die Leistungsfähigkeit des 
C64 beachtlich erhöhen. Es wäre ein Unding, alle derzeit 
erhältlichen Hardware-Erweiterungen aufzuzählen, einige 
seien jedoch genannt. 

Obgleich das Laden und Speichern von Programmen mit 
einer Diskettenstation wesentlich schneller geht als mit ei¬ 
ner Datasette, läßt sich die Arbeitsgeschwindigkeit der 
Floppy 1541 und 1571 mit etwas zusätzlicher Elektronik er¬ 
heblich verbessern. So gibt es heute die verschiedensten 
Erweiterungen, die den Datenaustausch zwischen Compu¬ 
ter und Floppystation beschleunigen (Floppyspeeder). Le¬ 
sen Sie dazu auch einen Testbericht in den Ausgaben 1/88 
und 2/88 oder das Floppy-Sonderheft 25 des 64’er-Maga- 
zins. 

Daneben sind zum Beispiel Speichererweiterungen er¬ 
hältlich, die ebenfalls nur in den entsprechenden Anschluß 
des C64 gesteckt werden müssen. Eine interessante Neu¬ 
heit dieses Jahres ist eine kleine Platine, mit der man die 
Arbeitsgeschwindigkeit des C 64 stufenlos auf das Vierfa¬ 
che erhöhen kann. Eine unglaubliche Leistungsteigerung 
für den meistverkauften Computer Deutschlands. 

Programme im Eigenbau 


Wenn Sie nun Ihr Computersystem zusammengestellt und 
gemäß der Betriebsanleitung angeschlossen haben, stellt 
sich die Frage, was mit dem C64, dessen Cursor (blinken¬ 
des hellblaues Kästchen) erwartungsvoll auf dem Bild¬ 
schirm blinkt, alles anzustellen ist. 

Offensichtlich fehlt noch etwas sehr Wichtiges, um den 
C64 in Aktion treten zu lassen, denn bisher ist nur der blin¬ 
kende Cursor auf dem Bildschirmzu sehen. Die Antwort ist 
einfach: Wie jeder andere Computer benötigt der C 64 Pro¬ 
gramme, mit denen seine enormen Fähigkeiten geweckt 



Bild 3. Ab ins Telefonnetz mit einem Modem oder 
Akustikkoppler 


werden. Sie haben die Möglichkeit, diese Programme 
selbst zu schreiben. Gleich nach dem Einschalten des 
Computers können Sie sofort damit beginnen, denn der 
C 64 versteht die einfache Sprache »Basic«, mit der sich je¬ 
de Art von Programmen erstellen läßt. So wird Ihr erstes 
selbstgeschriebenes Programm wohl ein Basic-Programm 
sein. Doch Basic ist nur eine von vielen verschiedenen Pro¬ 
grammiersprachen. Weitere Sprachen sind zum Beispiel 
Pascal, Comal, Lisp, Fortran oder die professionelle Spra¬ 
che C, mit der vornehmlich Großrechenanlagen arbeiten. 
Auch das Betriebssystem desAmiga ist in C geschrieben. 

Diese Sprachen sind für den C 64 jedoch nicht verständ¬ 


lich, gleich nach dem Einschalten benötigt er spezielle Pro¬ 
gramme, sogenannte Compiler. 

Begibt man sich in die Welt der professionellen Program¬ 
mierung, wird man bald auf den Begriff Maschinensprache 
treffen. Dabei handelt es sich um eine elementare Pro¬ 
grammiersprache, die der Computer blitzschnell ausfüh¬ 
ren kann. Ein Programm in Maschinensprache ist etwa 
lOOOmal schneller als das gleiche Programm in Basic. Das 


zu verkaufen 

Baujahr 1983, 1.3 1, 60 PS, Normal 
(bleifrei), ASU neu, TUV 09/'89, 
8fach bereift 

Komplette Ausstattung: 

H4-Licht, Br emskraftuer stärker, Teppichboden, Fufimatten 
vorne und hinten, umklappbare Rückbank, zweiter Auflen- 
spiegel, von innen entriegelbare Heckklappe, Nebelschlufl- 
leuchte, beleuchteter Kofferraum, Liegesitze, Felle, heizbare 
Heckscheibe, Stereo-Anlage und dazu gibt’s 4 Winterreifen. 

Bei Interesse bitte Willi Brechtl anrufen! 


Bild 4. Beeindruckend: die Grafikfähigkeiten des C64 


3750 Mark 



Erlernen und Programmieren dieser sehr spezifischen 
Sprache st jedoch recht schwierig. 

Oftmals fehlt aber die Zeit, die Muße oder die nötige Er¬ 
fahrung, um eigene Programm-Ideen auf dem C64 zu ver¬ 
wirklichen. In diesem Fall wird man auf die käuflichen Pro¬ 
gramme zurückgreifen, die häufig recht teuer sind. Gerade 
Computer-Fans mit schmalem Geldbeutel sind hier be¬ 
nachteiligt. Doch gibt es schon seit einigen Jahren eine 
preiswerte Alternative in Form des 64’er-Magazins und der 
64’er-Sonderhefte, das monatlich eine Vielzahl von guten 
und teils professionellen Programmen für den C64 und 
C128 abdruckt. Wahlweise können sämtliche Programme 
einer Ausgabe auch auf Diskette (Programmservice-Dis¬ 
kette) zu günstigen Preisen bezogen werden, um sich die 
zeitaufwendige Tipparbeit zu ersparen. Obgleich alle veröf¬ 
fentlichten Programme von Lesern des 64'er-Magazins 
stammen, haben sie gerade in den letzten Jahren eine 
Qualität erreicht, die käufliche Software oft in den Schatten 
stellt. 


Emsatzbereiche 


Wenden wir uns nun den verschiedenen Aufgaben zu, die 
der C64 bewältigen kann. 

Wer gelegentlich einen Brief oder einen anderen Text auf 
einer mechanischen Schreibmaschine tippen mußte, weiß, 
welche Schwierigkeiten dabei auftreten können. Hat man 
sich beispielsweise vertippt, ist eine Verbesserung meist 
gar nicht oder nur unter Zuhilfenahme einer Korrektur-Flüs¬ 
sigkeit möglich. Das Ergebnis ist in solchen Fällen mehr 
schlecht als recht. Mit der Einführung von Computern lag 
es nahe, das Schreiben von Texten auf dem Bildschirm vor¬ 
zunehmen. Dort lassen sich Fehler leicht korrigieren, Texte 
schnell und einfach umgestalten und in die richtige Form 
bringen. Ein angeschlossener Drucker bringt den gesam¬ 
ten Text schließlich zu Papier. Was vor einigen Jahren nur 



48 


SONDERHEFT 26 














C64 


GRUNDLAGEN 


auf teuren Computersystemen möglich war, beherrscht der 
C64 heute vorzüglich. Mit einem geeigneten »Textverarbei¬ 
tungsprogramm« und einem guten Drucker können Sie als 
C64-Besitzer nun Ihre gesamte Korrespondenz auf dem 
Bildschirm erledigen. Die bekanntesten Textverarbeitungs¬ 
programme sind »Vizawrite 64« für den C64 (Bild 1) sowie 
»Vizawrite Classic« und »Protext 128« für den C128. Als 
günstige Alternative bietet das 64’er-Magazin leistungsfä¬ 
hige Programme wie »Mastertext 64« und »Mastertext 128«. 

Anwendung findet der Computer auch in der Verwaltung 
von umfangreichen Dateien. Besitzen Sie zum Beispiel ei¬ 
nen Karteikasten, der die Adressen Ihrer Freunde enthält, 
wissen Sie, wie schwierig es ist, die Karteikarten in Ord¬ 
nung zu halten und stets zu aktualisieren. Probleme treten 
insbesondere auf, wenn sich die Anzahl der Adressen stets 
erhöht, so daß man bald den Überblick verliert. Auch hier 
kann der C64 helfen. Datenverwaltungsprogramme wie 
»Superbase« und das 64’er-Programm »Datec« gestatten 
Ihnen einen elektronischen Karteikasten aufzubauen, in 
dem Daten einfach über die Tastatur eingegeben und auf 
Diskette gespeichert werden. Auf Tastendruck lassen sich 
zum Beispiel einzelne Adressen vor- und zurückbiättern, 
ändern und sogar alphabetisch sortieren. Schließlich kann 
man auch nach bestimmten Adressen suchen lassen. 

Der C64 als Steuermann 


Text-und Datenverarbeitung sind nur zwei Beispiele der so¬ 
genannten professionellen Anwendungen. Daneben findet 
man für den C64 und den C128 viele weitere Programme, 
etwa zur Tabellenkalkulation oder Finanzbuchhaltung, so 
daß man den C64 durchaus als professionellen Computer 
bezeichnen kann. onur 

Wir erinnern uns, daß der C 64 sowie der C128 über ver¬ 
schiedene Anschlüsse verfügen, die für Peripherie-Geräte, 
wie die Floppy und Erweiterungen genutzt werden. Doch 


Füialo q -Construc tlon- Set 

«Platz für Zeichensatz). . 


Es würde Ihnen sicherlich auch gefallen, wenn Sie jeden 
Morgen pünktlich mit sanftem Licht und leiser Musik aus 
der Stereo-Anlage geweckt würden, während die Kaffee¬ 
maschine, per C64 aktiviert, bereits einen angenehmen 
Duft verbreitet. All das und vieles mehr läßt sich mit einem 
C64, etwas Elektronik-Bastelei und viel Fantasie bewerk¬ 
stelligen. 

Gelegentlich ist es nützlich, wenn zwei Computer direkt 
miteinander verbunden werden, um Daten auszutauschen. 
Stehen beide Computer auf demselben Schreibtisch, ist 
diese Aufgabe vergleichsweise einfach zu bewältigen. Wie 
aber kann ein Computer in Hamburg mit einem in München 
verbunden werden? Die Antwort heißt »DFÜ«, die Abkür- 
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Bild 6. Aufbruch in die dritte Dimension: Giga-CAD erstellt 
dreidimensionale Objekte 


zung für »Datenfernübertragung«. Die DFÜ vollzieht sich 
über das öffentliche Telefonnetz, so daß ein Telefonan¬ 
schluß genügt, um mit Computern in aller Welt in Verbin¬ 
dung zu treten (siehe auch Seite 17). Der Anschluß eines 
C 64 an die Telefonleitung erfolgt über einen Akustikkoppler 
(Bild 3) oder ein Modem, welche die Daten direkt über das 
Telefonnetz schicken oder empfangen. Zusätzlich benöti¬ 
gen Sie ein DFÜ-Programm für den C64, zum Beispiel 
»Proterm V6.0«, das in der Ausgabe 4/87 des 64’er-Maga- 
zins veröffentlicht wurde. 


Grafik-Zaubereien 
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Alle Teile können im Sprite-Editor 
beliebig gespiegelt und gedreht werden 


Bild 5. Das Zeichenprogramm Hi-Eddi+ beim Entwerfen 
einer elektrischen Schaltung 

lassen sich über diese Schnittstellen auch andere externe 
Geräte steuern, zum Beispiel Roboter (Bild 2). Durch ein 
Programm gesteuert, setzt sich die kleine Maschine in Be¬ 
wegung, um verschiedene Arbeiten auszuführen. Viel¬ 
leichtwollen Sie aber auch Ihre Modelleisenbahn per Com¬ 
puter steuern. Der C64 übernimmt dann auf Knopfdruck 
das Stellen der Weichen und Signale, überwacht die Fahr¬ 
ten der einzelnen Züge und schließt rechtzeitig die Bahn¬ 
schranken, um einen reibungslosen Ablauf zu gewährlei¬ 
sten. Der dazu nötige Aufwand ist allerdings relativ hoch. 


Auf diese Weise können Sie in den Speichern anderer 
Computer herumstöbern, sich in elektronischen Briefkä¬ 
sten (Mailboxen) umsehen, Programme über große Distan¬ 
zen hinweg tauschen oder einfach nur per Telefon eine Par¬ 
tie Schach mit einem weit entfernten Freund spielen. 

Die Anwendungsmöglichkeiten des C 64 sind damit aber 
noch nicht erschöpft, insbesondere wenn wir nun die grafi¬ 
schen und musikalischen Eigenschaften unseres Compu¬ 
ters betrachten. 

Neben den Buchstaben und Sonderzeichen sind der 
C64 und der C128 zusätzlich imstande, hochauflösende 
Farb-Grafiken zu erzeugen. »Hochauflösend« bedeutet, 
daß nun jeder Punkt auf dem Bildschirm einzeln angespro¬ 
chen wird. Insgesamt stehen 64000 Punkte zur Verfügung, 
um beeindruckende Grafiken wie etwa in Bild 4 zu erzeu¬ 
gen. Der Anwender hat dabei die Wahl von vier Farben aus 
einer Palette von 16 Tönungen, so daß bunte und oftmals 
sehr realitätsgetreue Bilder entstehen. 

Die Programmierung solcher Grafiken ist in Basic jedoch 
kompliziert. Hier empfiehlt es sich, auf Befehls-Erweiterun¬ 
gen zurückzugreifen, die das Basic 2.0 des C 64 um nützli- 
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che Grafik-Befehle erweitern, zum Beispiel »HYPER-BA- 
SIC«. Dem Besitzer des C128 stehen mit dem Basic 7.0 
schon viele dieser Befehle zur Verfügung. Noch einfacher 
und komfortabler ist die Verwendung von Grafikprogram¬ 
men, die es gestatten, mit Hilfe eines Joysticks oder einer 
»Maus« auf dem Bildschirm zu malen. Bekannte Vertreter 



Bild 7. Music-Studio stellt Notenblätter auf dem Bildschirm dar 

dieses Anwendungsbereichs sind das »Advanced OCP Art 
Studio«, »Star-Painter« oder »Hi-Eddi+« (siehe auch Seite 
14). 

Diese Programme besitzen Funktionen, um beispiels¬ 
weise Linien oder Kreise schnell und einfach zu zeichnen 
oder Flächen mit Farben oder Mustern zu füllen. Mit vielen 
Grafikprogrammen können Sie Ihr Kunst-Werk auf einem 
Drucker ausgeben. 

Neben dem rein künstlerischen Aspekt dieser Program¬ 
me, sind einige auch für die ernsthafte Konstruktion von 
Objekten geeignet. Der hierfür gebräuchliche Ausdruck 
heißt »Computer Aided Design« oder »Computer Aided 
Construction«, kurz CAD oder CAC. 

Konstruktionen am Bildschirm 


So können zum Beispiel ähnlich einem Baukastensystem 
elektronische Schaltungen auf dem Bildschirm entworfen 
werden, mit Hi-Eddi+ gelingt dies schnell und einfach (Bild 
5). Die einzelnen Bauteile werden einfach per Joystick oder 
Maus ausgewählt, gegebenfalls verändert und anschlie¬ 
ßend in der Schaltung plaziert. Ein so erstellter und ausge¬ 
druckter Schaltplan kann später etwa dem Entwurf eines 
Platinen-Layouts dienen. 

Bisher bewegten wir uns grafisch lediglich in der zweiten 
Dimension, daß heißt auf der Ebene. Die eben genannten 
Programme erlauben nämlich meist nur die Erstellung von 
zweidimensionalen Bildern. Will man auch in die dritte Di¬ 
mension gelangen, um räumliche Objekte auf dem C64 zu 
konstruieren (3D-CAD), benötigt man ein Programm, das 
für den C64 bisher einzigartig ist: sein Name lautet »Giga 
CAD«. Es wurde in Sonderheft 8/86 veröffentlicht. 

Giga-CAD gestattet das Erstellen von dreidimensionalen 
Objekten, die beliebig gedreht und verschoben werden 
können. Bild 6 zeigt zum Beispiel einen soeben konstruier¬ 
ten Rotationskörper. Die Darstellung kann als Drahtgitter- 
Modell, mit versteckten Linien und sogar mit Schattierun¬ 
gen vorgenommen werden, so daß sich eindrucksvolle Bil¬ 
der ergeben. Mit einer Spezialfunktion entsteht aus erstell¬ 
ten Einzelbildern ein kleiner Computerfilm. 


Doch neben den hervorragenden Grafikeigenschaften 
bietet der C64 auch einen entsprechenden Ohren¬ 
schmaus. Denn durch einen speziellen Computerbaustein, 
dem SID (Sound Interface Device), wird der C64 zu einem 
perfekten Mini-Synthesizer. Insgesamt stehen drei Stim¬ 
men für Hobby-Komposition zur Verfügung. Jede dieser 
Stimmen läßt sich unabhängig in ihrer Schwingungsform 
und Hüllkurve verändern, mit verschiedenen Filtern modu¬ 
lieren, so daß wie bei einem echten Synthesizer nahezu je¬ 
der Klang erzeugt werden kann. Mit einer entsprechenden 
Erweiterung und einem Mikrofon digitalisiert der C 64 sogar 
Geräusche, um sie später über die Lautsprecher des Fern¬ 
sehgerätes oder einer Stereo-Anlage wiederzugeben. 

Das Ein-Mann-Orchester 


Wie auch die Grafik ist dieser Soundchip jedoch umständ¬ 
lich anzusteuern. Spezielle Programme wie »Music Shop« 
oder »Music System« unterstützen deshalb die Program¬ 
mierung von Musik auf dem C 64. Mit ihrer Hilfe lassen sich 
alle Klangparameter spielend ändern und Musikstücke di¬ 
rekt über die Tastatur oder eine aufgelegte Klaviatur-Vor¬ 
richtung von Hand oder über Noten eingeben, wie es 
»Music-Studio« in Bild 7 zeigt. Selbstverständlich lassen 
sich die so programmierten Musikstücke auf Diskette spei¬ 
chern oder in perfekter musikalischer Notation aus- 
drucken. 

Auch in diesem Sonderheft finden Sie alle wichtigen 
Grundlagen und ein hervorragendes Programm zu diesem 
Thema. 

Eine nicht minder musikalische Begabung zeigt der C64 
auch in der professionellen Musik. Das Schlagwort lautet 
hier »Ml! >•■• , das nahezu jedem Musiker bekannt ist. Bei MI¬ 
DI (Abkürzung für »Musical Information Digital Interface«) 
handelt es sich um ein bewährtes Informationssystem zur 
Steuerung vornehmlich von Synthesizern. Über eine über¬ 
geordnete Führungseinheit, zum Beispiel einen Computer, 
können bis zu 16 MIDI-Geräte miteinander verbunden und 
zentral gesteuert werden, so daß mit geeigneter Software 
ganze Orchesterwie von Geisterhand erklingen. Der Traum 
vom perfekten Ein-Mann-Orchester ist damit Wirklichkeit 
geworden. 

Gerade auf diesem Sektor ist der C64 mit der größten 
Auswahl an MIDI-Zubehörführend unter allen Heimcompu¬ 
tern. Ein MIDI-Interface und geeignete Software genügen, 
und Ihr Computer verwandelt sich in eine leistungsfähige 
MIDI-Steuereinheit. So lassen sich mit sogenannten Bank- 
Loading-Programmen die modernen digitalen Synthesizer 
bequem auf dem Bildschirm programmieren, neu erzeugte 
Sounds auf Diskette speichern und vieles mehr. Sequenzer 
nehmen schließlich den Taktstock in die Hand und steuern 
die so programmierten Synthesizer. 


Nach der Arbeit das Vergnügen 


Während der Arbeit mit dem C 64 ist es ratsam, sich hin und 
wieder Erholungspausen zu gönnen und Entspannung in 
unterhaltsamen Tätigkeiten zu finden. Auch hier läßt Sie Ihr 
Computer nicht allein. Nicht zuletzt die hervorragenden 
Grafik- und Soundeigenschaften haben ihn heute zum be¬ 
liebtesten Spiele-Computer gemacht. Denn neben den 
oben beschriebenen »ernsthaften« Anwendungsprogram¬ 
men bietet er eine kaum überschaubare Zahl an 
Unterhaltungs-Software. Dazu gehören Spiele, die uns in 
eine andere Welt entführen, in eine Welt der Fantasie und 
des Traums. 
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Gleichgültig, ob Sie sich als waghalsiger Raumschiff- 
Kommandant durch einen Wall von Weltraum-Monstern 
kämpfen, als Karate-Meister in die Welt ziehen, um dem Bö¬ 
sen das Fürchten zu lehren oder als Barbar wilde Schwert¬ 
schlachten führen wollen, der C64 bietet viele Spiele, um 
dies zu verwirklichen. Erfolgreiche Spiele sind zum Bei¬ 
spiel Nemesis, International Karate oder Elite. Ein »Ren¬ 
ner» ist derzeit »Wizball«, ein hervorragendes Geschick- 
lichkeits- und Schießspiel (Bild 8). 



Bild 8. Ein Spiel zur Entspannung: Wizball ist eines der 
vielen Spiele für den C64 

Vielleicht haben Sie auch einmal davon geträumt, ein 
Flugzeug oder sogar einen Düsenjäger zu fliegen. Mit den 
sogenannten Simulationsspielen ist sogar ein rasantes Au- 

G46R onur 


torennen auf der Silverstone-Rennstrecke mit »Revs Plus« 
bequem im Wohnzimmersessel auszutragen. 

Sportlich ambitionierte Computer-Fans kommen mit 
dem C64 ebenfalls auf ihre Kosten. Eine Reihe von Sport- 
Spielen verwandeln Ihr schönes Heim in ein Leichtathletik-, 
Baseball-, Fußball- oder Eishockey-Stadion, in dem Sie 
endlich einmal selbst mitspielen können. 

Wer eine Welt der Fantasy oder Science-Fiction vorzieht 
und Abenteuer sucht, hat sicher viel Freude an Adventures 
und Rollenspielen. Hier schlüpfen Sie in die Rolle eines 
oder mehrerer Helden, die komplizierte und nicht immer 
ungefährliche Abenteuer bestehen müssen. 

Ruhige Naturen, die eher Taktik und Strategie suchen, 
werden unter dem zahlreichen Angebot an Spielen Brett¬ 
spiele wie Dame, Backgammon oder Schach finden. 

Über die neuesten Spiele informiert zum Beispiel die 
Zeitschrift »Power Play«, deren zweite Ausgabe vor kurzem 
erschien. 


Aller Anfang ist schwer 


Die in diesem Bericht angesprochenen Anwendungsberei¬ 
che des C 64 und C128 sind nur ein kleiner Ausschnitt der 
wirklichen Möglichkeiten, von denen es noch einige zu ent¬ 
decken gilt. Doch gerade Einsteiger haben oftmals Schwie¬ 
rigkeiten, mit den Unmengen von Information, die auf sie 
einströmen, fertig zu werden. Hier ist Hilfe vonnöten, die 
Sie in dem vor Ihnen liegenden Sonderheft finden. 

Auf dem weiteren Weg wird Ihnen schließlich das 64'er- 
Magazin zur Seite stehen, um Probleme mit dem C64 und 
dem C128 zu bewältigen. (Michael Thomas/rs) 


Der Computer als 
Turbo-Sdweibmasdiine 


Die Anwendung mit dem größten Stellenwert, 
auch bei Heimcomputern, ist »Textverarbeitung«. 
Was vor allem für diese Anwendung spricht, ist 
die Entlastung und Arbeitserleichterung, die sie 
dem Benutzer bietet. Er kann sich voll auf das 
eigentliche Schreiben konzentrieren. 


E ins sei vorweg gesagt: Auch mit dem Computer schrei¬ 
ben sich Briefe, Texte, Referate oder Examensarbeiten 
nicht von selbst. Doch wer einmal die Annehmlichkei¬ 
ten computerunterstützten Schreibens genossen hat, 
möchte sie nicht mehr missen. Denn Textverarbeitung mit 
dem Computer erlaubt es, einen einmal geschriebenen 
Text beliebig zu verändern, zu korrigieren und in die ge¬ 
wünschte Form zu bringen, bis man das Endergebnis, ein 
fehlerfreies und optisch ansprechendes Dokument, aus- 
drucken kann. Natürlich muß jedes Dokument, jeder Brief 
einer gewissen äußeren Form genügen. Daran brauchen 
Sie beim Schreiben selbst keinen einzigen Gedanken zu 
verschwenden. Warum auch? Die endgültige Gestaltung 
des Textes kann man sich bis zum Schluß aufsparen. Dann 
aber entfalten Textverarbeitungsprogramme eine weitere 
faszinierende Seite ihres Könnens. Natürlich immer vor¬ 


ausgesetzt, Ihr Drucker beherrscht die Möglichkeiten, die 
das Textprogramm vorsieht. 

Für den C 64 und den C128 befindet sich mittlerweile ei¬ 
ne Vielzahl von Textprogrammen auf dem Markt. Einige 
sind auch schon wieder von der Bildfläche verschwunden, 
sei es wegen zu geringer Leistungsfähigkeit oder einem zu 
hohem Preis. Wir wollen Ihnen hier jedoch nicht zum Kauf 
eines bestimmten Textprogrammes raten, sondern Ihnen 
eher einen Überblick darüber geben, was solche Program¬ 
me auf einem Heimcomputer leisten können, und auf was 
Sie achten sollten. 

Generell läßt sich für alle Programme sagen, daß bei der 
Textverarbeitung alle Arbeitsgänge im Computer selbst 
durchlaufen werden - sofern Sie dies wollen und es Ihrem 
persönlichen Arbeitsstil entspricht. Nehmen wir einmal an, 
Sie haben ein Referat für die Schule oder die Uni zu erar¬ 
beiten. Nach den üblichen Vorarbeiten schreiben Sie eine 
stichpunktartige Gliederung der Arbeit, formulieren diese 
nach Belieben um, ändern die Reihenfolge der einzelnen 
Punkte und beginnen dann langsam, dieses Gerüst mit 
dem eigentlichen Inhalt zu füllen. Bis die Arbeit inklusive al¬ 
ler Fußnoten, dem Literaturverzeichnis etc. fertig ist, wurde 
noch kein einziges Blatt Papier verschwendet. Durch die 
Möglichkeit der Datenspeicherung auf Diskette können Sie 
sich selbstverständlich jederzeit eine Sicherheitskopie Ih- 
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res Textes vor der Veränderung anlegen. Ist Ihnen ein Tipp¬ 
fehler unterlaufen, so muß kein Tipp-Ex oder ähnliches zu 
Hilfe genommen werden, sondern eine Änderung ist pro¬ 
blemlos möglich, indem Sie den Fehler überschreiben. Ge¬ 
nauso einfach ist es, wenn Sie noch eine Textpassage in ei¬ 
nen schon geschriebenen Text einfügen wollen. Hierfür 
bieten die Programme einen speziellen Einfügemodus, der 
dies erlaubt. Sollte sich heraussteilen, daß ein ganzer Text¬ 
abschnitt vom Konzept her besser an eine andere Stellte 
paßt, bieten nahezu alle Programme sogenante Blockope¬ 
rationen an. 

Für jeden das richtige Textprogramm 


Mit diesen kann man ganze Textabschnitte markieren und 
diese dann nach Belieben löschen, verschieben oder an 
andere Stellen kopieren. Mit einer Schreibmaschine müßte 
in diesem Falle alles noch einmal geschrieben werden. 
Spätestens hier wird offenbar, daß es sich bei Textverarbei¬ 
tungen um mehr als nur elektronische Schreibmaschinen 
handelt. Denn bei solchen Geräten arbeitete man prinzi¬ 
piell an der Endfassung des Textes, wohingegen am Com¬ 
puter die Endfassung ein relativer Begriff ist, dessen Fest¬ 
setzung von Ihrer Zufriedenheit mit dem bisherigen Resul¬ 
tat abhängt. Auch wenn in einem Text ein Begriff durch ei¬ 
nen anderen ersetzt werden soll, bietet hier nahezu jedes 
Programm eine entsprechende Funktion. Haben Sie bei¬ 
spielsweise in einem längeren Text das Wort »Rentabilitäts¬ 
analyse« aus Bequemlichkeit immer mit »Ra.« abgekürzt, 
so ist es ein leichtes, dieses nun automatisch durch den 
korrekten Begriff zu ersetzen. 

Wie schon erwähnt, brauchen Sie sich beim Schreiben 
keine Gedanken um die äußere Form des Textes machen. 
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Bild 1. Grafiken lassen sich bei Geowrite leicht in den Text 
einbinden 


Auch die Überlegung, ob das nächste Wort noch in die Zeile 
paßt oder besser doch in die nächste geschrieben wird, ge¬ 
hört der Vergangenheit an. Hierfür gibt es den automati¬ 
schen Umbruch (Wordwrap), der entweder direkt auf dem 
Bildschirm angezeigt oder beim Drucken ausgeführt wird. 
Grundsätzlich gilt, daß Programme, die schon am Bild¬ 
schirm solche Formatierungen durchführen, wie es in der 
Fachsprache heißt, zwar komfortabler, aber meist auch 
langsamer sind, was das Bewegen durch den Text angeht. 
Dies resultiert aus der zusätzlichen Arbeit, die das Pro¬ 
gramm durch die annähernde Darstellung des Druckbildes 
am Bildschirm leisten muß. Anders bei Programmen, die 
erst beim Ausdruck die Formatierung vornehmen. Diese 
sind zwar sehr schnell in dieser Hinsicht. Durch die unfor¬ 


matierte Bildschirmdarstellung, die häufig noch mit Steuer¬ 
zeichen durchsetzt ist, wird der Text jedoch leicht unüber¬ 
sichtlich. 

Die Möglichkeit der Korrektur von Fehlern wurde schon 
angesprochen. Doch damit nicht genug: Manche Program¬ 
me stellen Funktionen für die automatische Nachbearbei¬ 
tung und Korrektur von Texten zur Verfügung. Sehr hilfreich 
ist die Rechtschreibehilfe (oder »Spell-Check«) und die au¬ 
tomatische Silbentrennung, welche vor allem für ein homo¬ 
generes Schriftbild beim Blocksatz wichtig ist. Diese Featu¬ 
res sind bis auf Vizaspell für Vizawrite 64 und Master-Spell, 
ein Rechtschreibkorrekturprogramm für Master-Text aus 
dem 64’er-Sonderheft 24 meist nur für Programme auf dem 
C128 (wie Protext 128) erhältlich. Die Rechtschreibehilfe 
stellt sozusagen ein lernfähiges elektronisches Wörter¬ 
buch dar, das automatisch mit dem Text verglichen wird. 
Stößt der Computer dabei auf ein unbekanntes Wort, so 
kann dies entweder korrigiert, oder falls es korrekt, dem 
Wörterbruch aber unbekannt ist, in den Wortschatz aufge¬ 
nommen werden. 

Eine andere sehr hilfreiche Fähigkeit von Textprogram¬ 
men ist es, Serienbriefe schreiben zu können (Mail Merge), 
was bei der beruflichen Nutzung oder selbst einem privaten 
Einladungsschreiben sicher von Vorteil ist. Zusammen mit 
einer vorher erstellten Adreßdatei können mit dieser Funk¬ 
tion eine beliebige Anzahl von Briefen gedruckt werden, die 
sich beispielsweise nur durch die Adresse und die Anrede 
des Empfängers unterscheiden. Dennoch erhält jeder 
Empfänger seinen persönlichen Brief und Sie haben nur 
ein Minimum an Aufwand. 

Den Zusatzfunktionen, die Textprogramme neben dem 
reinen Schreiben haben können, ist eigentlich nur durch 
die Fantasie der Programmierer Grenzen gesetzt. Was sich 
beim Bedienungskomfort immer mehr durchsetzt, ist bei¬ 
spielsweise die Steuerung der Programme über Windows. 
Master-Text 128 (aus dem 64’er-Sonderheft 18) besitzt so¬ 
gar einen eingebauten Terminalmodus, der es erlaubt, Do¬ 
kumente direkt per Telefon an den Empfänger zu schicken 
oder aber per Datenfernübertragung (DFÜ) einfach etwas 
in Mailboxen herumzustöbern. 

Was braucht man zur Textverarbeitung? 


Doch kommen wir zur benötigten Hardware-Ausstattung, 
die man zur Textverarbeitung braucht. Ein Computersy¬ 
stem besteht immer aus mehreren Komponenten, die für 
verschiedene Anwendungszwecke unterschiedlich wichtig 
sind. Bei der Textverarbeitung muß jedoch alles Hand in 
Hand arbeiten: 

Da wäre zunächst einmal der Computer selbst. Wichtig 
bei der Textverarbeitung ist die Art der Bildschirmdarstel¬ 
lung des geschriebenen Textes. Als Besitzer eines C 64, der 
normalerweise nur 40 Zeichen pro Zeile darstellen kann, 
muß man natürlich diesbezüglich einige kleine Kompromis¬ 
se eingehen, die von der verwendeten Software mehr oder 
wenigerstark kompensiert werden. Wer einen C128 sein ei¬ 
gen nennt, hat hier natürlich gut lachen, ist dieser Compu¬ 
ter mit einem geeigneten Monitor doch in der Lage, 80 Zei¬ 
chen pro Zeile gestochen scharf abzubilden. 

Des weiteren empfiehlt sich die Verwendung eines Dis¬ 
kettenlaufwerkes. Dies schon aus dem Grund, weil die mei¬ 
sten Textprogramme diskettenorientiert arbeiten und zu¬ 
dem das Arbeiten mit einer Datasette seit jeher eine enor¬ 
me Geduldsprobe darstellt. 

Sinn und Zweck der Textverarbeitung ist es, seine Texte 
auf einem Drucker möglichst ansprechend auszugeben. 
Diesem Gerät ist daher besondere Aufmerksamkeit zu wid¬ 
men, da von ihm die Qualität des »Outputs« abhängt. 
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Besonderes Augenmerk sollte man daher dem Schrift¬ 
bild des Druckers zuwenden und insbesondere auf dessen 
NLQ-Fähigkeit und einen deutschen Zeichensatz achten. 
NLQ bedeutet Near Letter Quality und steht für ein beson- 



Bild 2. Der Texteditor von Master-Text 64 

ders sauberes Schriftbild, das auch für die Korrespondenz 
verwendet werden kann. Ein weiterer wichtiger Punkt ist die 
Fähigkeit der Anpassung des Druckers an das Textpro¬ 
gramm Ihrer Wahl. Denn nicht immer ist es so einfach, daß 
man sofort nach dem Schreiben das gewünschte Ergebnis 
erhält. Oft erscheinen die deutschen Umlaute nicht, der 
Drucker unterstreicht nicht, wo er es soll etc. 


Sie sollten sich also bei der Wahl des Textprogrammes 
vergewissern, daß es eine Anpassung für den von Ihnen 
verwendeten Drucker bereitstellt oder diese durch seine 
Flexibilität möglich macht. Manche Programme sind hier 
geradezu vorbildlich, einige andere stellen nur Anpassun¬ 
gen für einige wenige und dazu noch seltene oder teure 
Drucker zur Verfügung. Falls Sie einen Commodo- 
re-Drucker wie den MPS 801 oder MPS 802 besitzen, sollte 
das Programm diese hinsichtlich der Umlaute, die dann als 
frei definierbares Sonderzeichen an den Drucker geschickt 
werden, unterstützen. Scheuen Sie sich also nicht, soweit 
möglich, vor dem Kauf des Druckers oder des Programms 
Ihrer Wahl, auf einem Test im Fachgeschäft zu bestehen. 

Die Entscheidung 


ln diesem Beitrag haben wir Ihnen einen Eindruck dessen 
vermittelt, was Textprogramme zu leisten imstande sind. 
Um nun das für Sie passende Programm herauszufinden, 
sollten neben den Preisüberlegungen auch andere Punkte 
einfließen: Welche Art von Text will man vorwiegend schrei¬ 
ben, ist an einen (semi)professionellen Einsatz gedacht 
oder soll nur ab und zu ein Brief geschrieben werden? Be¬ 
nötigt man Sonderfunktionen wie Grafikeinbindung (Bild 1) 
oder Terminalmodus? All das sollte beachtet werden. In 
den Sonderheften des 64'er-Magazins wurden schon zwei 
hervorragende Textprogramme veröffentlicht: Master-Text 
64 (Bild 2) im Sonderheft 16 und Master-Text 128 in Sonder¬ 
heft 18. Beide Programme erfüllen mehr als den Leistungs¬ 
standard, den man von Textverarbeitungs-Programmen er¬ 
warten sollte. (sk) 


Raubkopien: Kavaliersdelikt 
oder Verbrechen? 


Die Nase ist schon ganz platt vom An-die-Schau- 
fensterscheibe-drücken: Hinter der Scheibe sind 
die tollsten Computerspiele ausgestellt. Leider 
fehlen die erforderlichen Märker. Eines Tages bie¬ 
tet ein Bekannter das ersehnte Programm viel bil¬ 
liger an, als Raubkopie... 

D ie Verlockung, Raubkopien zu kaufen oder gar zu ver¬ 
kaufen ist groß. Programme können günstig erwor¬ 
ben, mit dem Verkauf kann leicht eine schnelle Mark 
gemacht werden. Im Wege steht jedoch der Gesetzgeber. 
Die Folgen des Geschäftes mit Raubkopien können 
schwerwiegender sein und länger anhalten, als die Freude 
am illegal erworbenen Programm. Doch wann ist das Ko¬ 
pieren eines Programmes eine strafbare Handlung? Wie 
sehen die Folgen aus? Wo verläuft die Grenze zwischen Si- 
cherheits- und Raubkopie? 

In unserer Rechtsordnung existiert ein Strafrecht und ein 
Privatrecht (auch Zivilrecht genannt). Beim Strafrecht geht 
der Staat gegen einen Bürger vor, der eine verbotene Tat 
begangen hat. Ein Staatsanwalt vertritt den Staat, und das 
Urteil wird von einem Strafgericht gefällt. Im Gegensatz da¬ 
zu verklagt beim Privatrecht ein Bürger einen anderen Bür¬ 
ger: Es werden Ansprüche geltend gemacht, zum Beispiel 
Geldforderungen. Beide Seiten können sich durch einen 
Anwalt vertreten lassen, das Urteil fällt ein Zivilgericht. 


Nicht jeder wird gleich bestraft! Im Zivil-wie im Strafrecht 
existieren zwei Kategorien von Menschen: Erwachsene 
und Minderjährige. Das Strafrecht unterscheidet Erwach¬ 
sene, Heranwachsende (18 bis 21 Jahre), Jugendliche (14 
bis 18 Jahre) und Kinder unter 14 Jahren, die wegen ihres 
Alters nicht bestraft werden können. Auf Jugendliche ist 
stets das gegenüber dem Erwachsenenstrafrecht mildere 
Jugendstrafrecht anzuwenden. Auf Heranwachsende kann 
es angewendet werden, je nach ihrem Entwicklungsgrad 
und der Art der Tat. Im Zivilrecht gibt es neben den Erwach¬ 
senen die beschränkt Geschäftsfähigen (7 bis 18 Jahre) 
und die Geschäftsunfähigen (Kinder unter 7 Jahren). 

Die Vorschrift, nach der das Raubkopieren strafbar ist, 
findet sich im Gesetz über Urheberrecht (UrhG) $106: »Wer 
in anderen als den gesetzlich zugelassenen Fällen ohne 
Einwilligung des Berechtigten ein Werk vervielfältigt oder 
verbreitet, wird mit Freiheitsstrafe bis zu einem Jahr oder 
mit Geldstrafe bestraft.« 

Wer Raubkopien erwirbt, kann sich strafbar machen. Der 
Erwerb von Raubkopien dient typischerweise der Anwen¬ 
dung. Bei einer Anwendung des Programms wird es erneut 
geladen, verbotenerweise! Die Anwendung einer Raubko¬ 
pie bedeutet eine verbotene Vervielfältigung! 

Was ist unter Verbreitung von Raubkopien zu verstehen? 
Ein Verbreiten liegt bereits beim Anbieten eines Pro¬ 
gramms vor, es muß nicht verkauft werden! Ist ein Pro¬ 
gramm verkauft, nützt auch die Tausch-Ausrede »ich habe 
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es doch nur gegen drei Bücher getauscht« nichts. Rechtlich 
gesehen ist der Tausch von Gegenständen und der Tausch 
eines Gegenstandes gegen Geld dasselbe! 

Der Staatsanwalt wird nur tätig, wenn ein Strafantrag ge¬ 
stelltwird. Einen solchen Antrag kann nur ein durch das Ko¬ 
pieren Geschädigter stellen, etwa das Unternehmen, das 
das Programm herstellt. Ein schlechter Freund oder rach¬ 
süchtiger Nachbar kann keinen Strafantrag stellen! 

Strafrecht und Zivilrecht 


Was passiert, wenn es zu einem Strafantrag kommt? Der 
Verlauf des Verfahrens hängt von der Schwere des Verge¬ 
hens ab: Hat der Täter seine Raubkopien, vielleicht sogar 
in großen Mengen, verkauft, oder hat er eine einzige Kopie 
für den »Hausgebrauch« erstellt? Der Staatsanwalt kann 
bei geringer Schuld des Täters das Verfahren einstellen. 
Tut er dies nicht, besitzt der Jugendrichter die Möglichkeit, 
von einer Bestrafung abzusehen und es etwa bei einer blo¬ 
ßen Verwarnung zu belassen. Verfahren wegen schwererer 
Taten verlaufen anders. Dem Richter stehen einige Mög¬ 
lichkeiten zur Verfügung: Er kann zum Beispiel dem Ju¬ 
gendlichen auferlegen, den angerichteten Schaden wieder 
gutzumachen, ohne Entgelt Arbeit in einem Altersheim zu 
leisten oder einen Geldbetrag an das Rote Kreuz zu zahlen. 

Jugendarrest und Jugendstrafe entsprechen der Frei¬ 
heitsstrafe für Erwachsene. Mit solchen Strafen brauchen 
Raubkopierer-von außergewöhnlichen Fällen abgesehen 
- nicht zu rechnen. 

Alle hieraufgeführten Bestrafungen werden weder in ein 
polizeiliches Führungszeugnis aufgenommen, noch müs¬ 
sen sie bei Bewerbungen angegeben werden. 

Vorsicht, die oben erläuterten Sachverhalte gelten nur 
für strafrechtliche Verfolgung. Beim Zivilrecht verhält es 
sich etwas anders. Nach $97 des Urheberrechtsgesetzes 
kann das Kopieren durch Gerichtsurteil verboten und Scha¬ 
denersatz gefordert werden. Die Herstellerfirma kann also 
vom Raubkopierer Geld fordern. Dieser Weg wird aller¬ 
dings in wenigen Fällen beschriften. Häufiger sind Fälle, in 
denen das Unternehmen dem Raubkopierer eine soge¬ 
nannte Abmahnung schickt. Dies ist eine Aufforderung, 
das Kopieren zu unterlassen und die meist recht saftigen 
Anwaltskosten zu bezahlen. Gibt der Raubkopierer dann 
nicht die vom Unternehmen geforderte (Unterlassungs-Er¬ 
klärung ab, kann ein Zivilprozeß folgen. Der Verlierer eines 
solchen Zivilprozesses muß neben dem Schadenersatz 
auch die Anwalts- und Gerichtskosten des Prozesses über¬ 
nehmen. Die Chancen, den hohen Betrag von einem Schü¬ 
ler zurückzuerhalten, sind recht gering. Der Aufwand lohnt 
sich meist für das Unternehmen nicht. 

Vertrag mit Haken 


Eine große deutsche Softwarefirma geht einen anderen 
Weg: Sie läßt den Kunden einen Kaufvertrag unterschrei¬ 
ben. Mit dem Vertrag unterschreibt der Käufer gleichzeitig 
die Verpflichtung, keine Kopie herzustellen. Bei Mißach¬ 
tung wird der Anwender unter Konventionalstrafe gestellt, 
er muß eine hohe Geldsumme zahlen. Dieses Verfahren 
hat einen Haken: Nicht jeder Käufer ist zivilrechtlich ver¬ 
tragsfähig! Unterschreibt ein 25jähriger einen Kaufvertrag, 
SO' ist dieser uneingeschränkt gültig. Stammt die Unter¬ 
schrift von einem 16jährigen, ist sie nur beschränkt gültig, 
da er zivilrechtlich nur beschränkt geschäftsfähig ist! 

Jugendliche haben rechtlich gesehen häufig eine gewis¬ 
se Narrenfreiheit. Wie sieht die Gegenseite den Problem¬ 
kreis Raubkopieren? Die Hersteller verlieren durch Raub¬ 


kopierer an Umsatz. Es hat spektakuläre Fälle gegeben, in 
denen ein 19jähriger Oberschüler einen Schaden von 23 
Millionen Mark anrichtete. Ein anderer ließ sich den Kauf¬ 
preis für die Raubkopien auf ausländische Konten überwei¬ 
sen und zog bei seiner Festnahme eine Schußwaffe. 

Die Vervielfältigung eines Programms für eine Datenver¬ 
arbeitungsanlage (Computer) ist stets nur mit Zustimmung 
des Berechtigten zulässig ($53 Abs. 4, Urhebergesetz). Ein 
Anwender darf ein Programm nur mit der Erlaubnis des 
Herstellers kopieren. Rechtlich gesehen ist bereits das Ein¬ 
speichern eines Programms in den Computer eine Verviel¬ 
fältigung. Diese Vervielfältigung ist vom Hersteller geneh¬ 
migt, da das Programm sonst nicht angewendet werden 
kann. In allen anderen Fällen liegen Raubkopien vor! 

Cracker & Co 


Computerprogramme sind häufig durch Schutzmaßnah¬ 
men gegen eine unerlaubte Vervielfältigung geschützt. Ein 
Cracker knackt diesen Schutz und hinterläßt auf der erstell¬ 
ten Raubkopie sein Crackerzeichen, den Beweis seiner 
»Kunst«. In dieser veränderten Form werden gecrackte Pro¬ 
gramme oft angeboten. Nach dem Urhebergesetz darf ein 
Programm nicht verändert werden. Das Hinterlassen eines 
Crackerzeichens ist gesetzwidrig, da der Urheber seine 
Einwilligung nicht gegeben hat. Vertrieb und Veränderung 
eines geschützten Programmes sind gesetzwidrig. 

Interessanterweise gibt es den »typischen Softwarepira¬ 
ten« nicht. Raubkopierer kommen aus allen gesellschaftli¬ 
chen Schichten: Der Opa von nebenan kann ein größerer 
Raubkopierer sein als sein 14jähriger Enkel. Die meisten 
Raubkopierer kommen allerdings aus der Altersgruppe der 
16 bis •-'»'jährigen. 

Die Gründe der Raubkopierer sind unterschiedlich. Es 
gibt mehr oder weniger gewerbsmäßige Raubkopierer. Sie 
verkaufen große Mengen an Kopien und verdienen dabei 
eine Menge Geld. Manche Softwarepiraten arbeiten mit ei¬ 
genen Listen, in denen alle möglichen Programme ange¬ 
boten werden. Nicht gewerbsmäßige Raubkopierer schei¬ 
nen häufig von einer bis ins Krankhafte gehenden Sammel¬ 
leidenschaft getrieben: Bei einem Studenten wurden über 
8500 Programme für seinen Computer gefunden. 

Die Lösung 


Fassen wir noch einmal zusammen: Raubkopierer fügen 
Softwarefirmen Verluste zu. Auf der anderen Seite sind die 
hohen Preise guter Programme für Computerbesitzer oft 
unerschwinglich. Hinzu kommt die allgemein bekannte 
Empfindlichkeit von Disketten. Ein kleiner Magnet kann das 
auf der Magnetscheibe befindliche Programm zerstören. 
Was bleibt dem armen Schüler übrig, als sein sauer zusam¬ 
mengespartes Programm durch eine Kopie zu sichern? 
Das wiederum ist in den meisten Fällen verboten. Jugendli¬ 
che gehen bei verbotenen Kopien ein vergleichsweise ge¬ 
ringes Risiko ein, ganz anders verhält es sich bei Erwach¬ 
senen. Auf jeden Fall läßt man sich auf eine unsichere Sa¬ 
che ein. Wo liegen Lösungen? 

Einige Software-Firmen bieten einen Kundenservice an. 
Defekte Original-Programme werden meist gratis oder ge¬ 
gen einen geringen Unkostenbeitrag anstandslos ersetzt. 
Der Käufer eines Programms ist nicht mehr gezwungen Si¬ 
cherheitskopien anzulegen. Es ist auch nichts dagegen 
einzuwenden, Programme unter Freunden auszuleihen, so 
wie man es mit Büchern macht. Das sehen Software- 
Häuser zwar nicht so gerne, müssen es aber dulden. 

(Henning Withöft/ad) 
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Geos: Komplettsystem 
mit allem Komfort 



Mit einer Menge Grafik wartet die dem 064 beige¬ 
legte Diskette auf. Zu Geos gibt es in der Zwi¬ 
schenzeit viele Programme, die nahezu alle wich¬ 
tigen Anwendungsbereiche abdecken. Hier er¬ 
fahren Sie alles über die fantastischen Fähigkei¬ 
ten der Geos-Produkte. 

B ei Geos handelt es sich um eine »grafische Benutzer¬ 
oberfläche«. Was das genau ist? Sicherlich kennen 
Sie die Szenerie. Da schaltet man den Computer ein, 
es tut sich aber bis auf das Erscheinen einer Meldung über¬ 
haupt nichts. Normalerweise müßten Sie jetzt, um bei¬ 
spielsweise eine Diskette zu formatieren, ellenlange Be¬ 
fehlsketten eingeben. Anders bei Geos. Hier wird Ihnen al¬ 
les, was Sie mit dem C 64 sonst im Direktmodus erledigen 
müßten, auf dem »Grafiktablett« serviert (Bild 1). Alles was 
Sie brauchen ist ein Joystick oder eine Maus. Damit können 
Sie alle Funktionen von Geos ansteuern. Das große Fen¬ 
ster, so nennt man einen abgegrenzten Grafikbereich mit 
fest definiertem Inhalt, beinhaltet für jedes Programm und 
jede Datei auf der eingelegten Diskette ein Symbol. Diese 
Symbole lassen sich unter Geos frei definieren. Dateien, 
die zu bestimmten Programmen gehören, sind dabei ein¬ 
heitlich gekennzeichnet. Unter den Symbolen, die auch 
»Icons«, zu deutsch »Piktogramme«, genannt werden, steht 


der jeweilige Programm- oder Dateiname. Wir werden im 
weiteren Verlauf noch ausführlicher auf die Piktogramme 
eingehen. Zunächst aber betrachten wir die kleine Leiste 
(Menüleiste) am linken oberen Bildschirmrand. 

Im Grunde genommen wird auch das, was Sie nach dem 
Laden von Geos sehen, nur von einem Programm reali¬ 
siert, dem Desktop. Dieses stellt dem Anwender die wich¬ 
tigsten Funktionen zur Arbeit mit dem C64 zur Verfügung. 

Alles im Griff mit Desktop 


Gemeint sind hier die Befehle, die sonst im Direktmodus 
umständlich eingegeben werden. Alle wichtigen Anwei¬ 
sungen verbergen sich hinter der Menüleiste. Die einzel¬ 
nen Menüpunkte lassen sich einfach aktivieren. Sie brau¬ 
chen nur den blauen Pfeil mit dem Joystick (anstatt des Joy¬ 
sticks können Sie auch immer die Maus verwenden) auf 
das gewünschte Menüfeld zu bewegen und kurz auf den 
Feuerknopf drücken (anklicken). Dann klappt eine Art Roll¬ 
laden von der Menüleiste herunter (Pull-Down-Menü). Hier 
finden Sie alle Funktionen zu dem betreffenden Menü¬ 
punkt aufgelistet (Bild 2). Wollen Sie eine Diskette formatie¬ 
ren, so brauchen Sie nur das Wort »Diskette« in der Menü¬ 
leiste anzuklicken. Im dann erscheinenden Pull-Down-Me¬ 
nü finden Sie dann eine Funktion mit dem Namen »Forma- 
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Fenster zur Anzeige . 
des akluellen 
Directory 


Hier kann man die .— 
verschiedenen Seilen 

aufblättem 


Fileeintrag 


Systemmenüs von Geos 



-LEOS U1.0 =§ 


26 fÜes 

149 K txjtes used 

16 K bytes fiee 






. _ _ . »Dl 

CEOS CEOS BOOT CEOS KERMftL DESK TOP 


m m h ■ 

CEOPniNT CEOUIPI E olutrn <lo<k «kulotor 


Symbol zum Schließen eines 
Fensters 



Anzeige des aktiven 
Laufwerks 


»Abfalleimer« zum 
Löschen von Files 


Dieses Symbol ermöglicht 
das Drucken eines Fües 


Bild 1. Desktop gibt Aufschluß über den Disketteninhalt und birgt noch weitere wichtige Funktionen in sich 


fieren«. Diese erklärt sich schon fast von selbst. Um ganz 
sicher zu gehen, daß auch keine falsche Diskette formatiert 
wird, erscheint abermals ein Fenster, in dem Sie aufgefor¬ 
dert werden, den Namen der Diskette einzugeben und die 
Richtigkeit Ihres Vorgehens bestätigen. Auf diese Art und 
Weise lassen sich auch Disketten kopieren, Dateien aus- 
drucken, Informationen zu Dateien abrufen und vieles 
mehr. Bleibt noch die Frage, was »geos« als Menü hier zu 
suchen hat. Hier können Sie den Druckertreiber wählen, 
die Farben einstellen und darüber hinaus die Accessories 
aktivieren. Accessories? Dabei handelt es sich um kleine 
Programme, die Ihren C64 zu einem, allerdings sehr be¬ 
grenzten, Multitasking befähigen. Alle Programme, die auf¬ 
geführt sind, lassen sich auch während der Arbeit eines an¬ 
deren Programmes ansprechen. Zur Verfügung steht hier 
unter anderem ein Notizblock (Bild 3), ein Taschenrechner, 
ein Wecker oder das Fotoalbum. 

Die verschiedenen Symbole innerhalb des großen Fen¬ 
sters sind Ihnen bereits wohlbekannt. Wie aber läßt sich ein 
durch ein Piktogramm dargestelltes Programm starten? 
Dazu verwenden wir genauso den Joystick und bewegen 
den blauen Pfeil auf das gewünschte Symbol. Um das Pro¬ 
gramm zu starten, drücken Sie einfach zweimal schnell hin- 



Bild 2. Pull-Down-Menüs schaffen eine angenehme 
Arbeitsumgebung mit großem Komfort 


tereinander den Feuerknopf (Doppelklick). Geos beginnt 
dann sofort mit dem Ladevorgang. Sollte es sich bei der an¬ 
geklickten Datei nicht um ein Programm handeln oder gar 
ein Lesefehler auf der Diskette vorliegen, erscheint wieder 
ein Extra-Fenster mit einer entsprechenden Fehlermel¬ 
dung. Besondere Aufmerksamkeit verdient das Programm 
»Konfiguration« auf der Geos-Boot-Diskette. Wer über eine 
derfürdcr128 angebotenen Speichererweiterungen ver¬ 
fügt, wird »Konfiguration« sehr bald zu schätzen wissen. 

Programme auf Knopfdruck 


Damit nämlich läßt sich die Erweiterung, übrigens auch am 
normalen C64 (C64-Modus des C128), als RAM-Disk, wie 
eine 1541 verwenden. Atemberaubende Geschwindigkei¬ 
ten sind so möglich. Die Erweiterung kann aber als »schat¬ 
tierte RAM-Disk« eingesetzt werden. Dazu muß man wis¬ 
sen, daß Geos-Applikationen große Programm- und Datei¬ 
teile (Overlays) immer wieder auf Diskette auslagern, um 
dringend benötigten Speicherplatz frei zu halten. Bei der 
schattierten RAM-Disk werden diese Overlays nun in die 
Erweiterung geschoben, wodurch die häufigen Disketten¬ 
zugriffe vermieden werden. Daraus wiederum resultiert ei¬ 
ne höhere Geschwindigkeit als im Normalbetrieb. Wer 
mehr über das Desktop und dessen Handhabung erfahren 
möchte, der sei auf die im Einsteigerteil des 64’er-Magazins 
beginnende Geos-Serie verwiesen. 

Nicht alleingelassen 


Was nützt eine grafische Benutzeroberfläche, wenn es kei¬ 
ne Programme gibt, die genau darauf abgestimmt sind? Es 
wäre doch schade, wenn zwar die Diskette per Pull-Down- 
Menü formatiert würde, die Textverarbeitung dann aber im 
alten Trott per umständlichen Tastenkombinationen be¬ 
dient wird. Die Entwickler von Geos haben sich hierzu eini¬ 
ges einfallen lassen. Damit Sie nicht zu sehr Ihren Geld¬ 
beutel beanspruchen müssen, sind der Geos-Diskette, wie 
Sie mit dem C64 ausgeliefert wird, bereits zwei Anwen¬ 
dungsprogramme beigelegt, die alle Fähigkeiten von Geos 
weiter ausnutzen. (Dem C 64 liegt beim Verkauf noch Geos 
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GRUNDLAGEN 


1.2 in Englisch bei. Die deutsche Version, Geos 1.3 
deutsch, erhalten Sie bei Markt & Technik im Umtausch für 
39 Mark). In diesem Fall spricht man in der Fachwelt auch 
von Applikationen. Es handelt sich bei Geos um die Pro¬ 
gramme Geowrite und Geopaint. Sehen wir uns zunächst 
Geowrite (Bild 4) näher an. Wie der Name schon erahnen 
läßt, handelt es sich dabei um eine Textverarbeitung. Aller¬ 
dings kann man Geowrite, wie es auf der Geos-Diskette vor¬ 
liegt, nicht als ausgereiftes System bezeichnen. So fehlen 
wichtige Formatierungsfunktionen. Blocksatz beispiels¬ 
weise ist überhaupt nicht möglich. Wie Sie später noch se¬ 
hen werden, ist dieses Manko bei Writer’s Workshop (siehe 
unten) vollständig behoben. Was hat denn dieses Geowrite 
dann zu bieten? Die verschiedenen Schriftarten beispiels¬ 
weise. Einige Zeichensätze sind bereits auf der Geos- 
Diskette enthalten. 


| geos ; file edit style 


P i 

fr 


Option? | i 1^1 

10 point 


Californic 


Mit GEOS w:.£22.. 

geliefert, die Dujinelle 
bietet. Dafuei 


und Schriftty 


option 

1 


12 point 


M point 


18 point 


Roma 


1 namens geoWrite 
n Funktionen 

t einer Menge Zeichensaetze 
Das sieht dann so aus: 
Fettschrift, ScJtraerselirift. Unterstrichen 


Universily 


Auch hier kann man wieder mit Pull-Down- 
Menues arbeiten. Oben wird zum Beispiel 
ein Zeichensatz ausgewaehlt. 


Bild 4. Geowrite - die Schriftarten machen es so flexibel 


Textverarbeitung eingebaut 


Diese können nicht nur nach Belieben im Text verwendet 
werden, sondern auch in der Größe manipuliert werden. 
Ziemlich einzigartig für den C64 dürfte der Bedienungs¬ 
komfort von Geowrite sein. Alle Funktionen sind bequem, 
wie vom Desktop bereits gewohnt, per Pull- Down-Menü zu 
erreichen. Wer darin einen zu großen Zeitaufwand sieht, 


neben einer stark erweiterten Geowrite-Version noch diver¬ 
se Zusätze. Geowrite 2.0 (Bild 6) verfügt denn auch über 
den bisher so schmerzlich vermißten Blocksatz und andere 
wichtige Funktionen zum Formatieren der Texte. Alle Funk¬ 
tionen des »alten« Geowrite blieben nach wie vor erhalten. 
Eine weitere Verbesserung stellen die mit Writer's Work¬ 
shop gelieferten Druckertreiber dar. Zwar sind auch damit 
noch keine tiefschwarzen Ausdrucke möglich, Treiber für 
fast alle gängigen Drucker machen Geos dafür einer brei¬ 
ten Masse zugänglich. 


geos i file j view j disk I sgecial 


GEOS 01.0 


31 fites 


156 K bytes used 


9 K bytes freeg 


1 . 

===== Hole Pad -| - ^ 


Hot newsll 1 Hot newsll! Hot neujs! 

GEOS 

Wie verlautet, entging Dr. Bobos 


Software-Laboratorium nur knapp 


einer Raeumung, nachdem 

CEOPPINT 

festgestellt worden war, dass .. . 


df#@fd.fd...fd ,d..df.../ #fw.»> 
error detected! transmmission 


aborted! 


Bild 3. Das »Notepad« - eines der Geos-Accessories 

kann alternativ auch mit Tastenkombinationen arbeiten. 
Unterstreichen und Fettdruck sind so ein Kinderspiel. Der 
wohl größte Vorteil von Geowrite liegt in der Fähigkeit, 
Geopaint-Bilder in den Text einzubinden. 


Utilities und Zeichensätze 


Neue Zeichensätze sucht man auch bei Writer's Workshop 
veiur.blich. Da die Zeichensätze auf der Diskette keinen 
Platz mehr gefunden haben, gibt es dafür ein eigenes Pro¬ 
dukt: Fontpack 1. Darauf finden sich 20 verschiedene Zei¬ 
chensätze, die Sie mit Geowrite und Geopaint verwenden 
können. Eine bescheidene Auswahl aus dem Zeichenan¬ 
gebot können Sie in Bild 7 bestaunen. Als nützliche Utility- 
Diskette erweist sich ein weiteres Geos-Paket namens 
Deskpack 1. Hier finden Sie jede Menge interessante Pro¬ 
gramme, die die Arbeit mit den angebotenen Applikationen 
unterstützen. Ein Beispiel ist der »Graphics Grabber«. Da¬ 
mit lassen sich Bilder aus Print Master und Newsroom 
(auch Print Shop) in ein für Geowrite und Geopaint brauch¬ 
bares Format konvertieren. Geodex (Bild 8), ein Programm 
des Deskpack, dient zur Verwaltung von Adressen, die 
dann später mit Geomerge für Serienbriefe unter Geowrite 
genutzt werden. Ein Kalender (Bild 9) und Black Jack für 
Spieler runden das Angebot von Deskpack ab. 


Grafik durch acht 


Geopaint (Bild 5) ist ein vollwertiges Grafikprogramm, das 
alle Funktionen beinhaltet, die man von einer guten Grafik- 
Software erwarten kann. So stehen alle nötigen Werkzeuge 
ebenso wie die verschiedensten Muster zur Verfügung. Ge¬ 
steuert und gezeichnet wird mit der Maus, Disketten- und 
Blockoperationen per Pull-Down-Menü durchgeführt. Die 
Besonderheit: Geopaint teilt eine Grafik in insgesamt acht 
Teile auf, am Bildschirm sehen Sie immer nur einen Teilaus¬ 
schnitt der Gesamtgrafik. Allerdings können sie einen be¬ 
liebigen Ausschnitt auf den Bildschirm holen und bearbei¬ 
ten. Für Geos gibt es in der Zwischenzeit eine ganze Reihe 
von Applikationen, die bereits auf dem Markt sind oder ge¬ 
gen Anfang dieses Jahres veröffentlicht werden. 

Als eines der leistungsfähigsten Pakete kann dabei Writer’s 
Workshop bezeichnet werden. Ein Blick auf den Inhalt zeigt 



Bild 5. Geopaint erfüllt durch seine Funktionsvielfalt die 
Wünsche eines jeden Grafik-Freaks voll und ganz 
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C64 


Zu den neuesten Geos-Applikationen zählt Geofile (Bild 
10). Eine Datenbank/Dateiverwaltung, bei der sich die Pro¬ 
grammierer einige Extras haben einfalien lassen. Wie Sie 
Ihre Daten eingeben, bestimmen Sie bei Geofile selbst. 
Das heißt Sie können eigene Bildschirmmasken definieren. 
Das gibt es doch alles schon, werden Sie jetzt vielleicht sa¬ 
gen - weit gefehlt. Bei Geofile kommt es viel mehr auf die 
Verfahrensweise an. Denn hier legen Sie Ihre Eingabemas¬ 
ken und damit gleichzeitig die Eingabefelder mit dem Joy- 



qeos j fite j edt j Option; j paqe \ font j stgte 
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Emdruck erinnert* denn auch mehr on ein Programm f|( einen Personal 
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Spotten [i(i 2 u lief der lext um die Bildei herum Buch der SpoRenumbiu 
Wies in filtern sahen iyfr die Revuiotion oul dem C (4 vor unseren Aug 


Geowrite geschrieben Danach bestimmen Sie do; Aussehen der Seite grn 
gewünschten Seitenbereiche o'; Dom Diese Do : ist denn l)r GeoPubtuh 
arbeiten hinnen Dos hinnen Sie verschieben, mit einem Kintergrund vers 
naprlich ouch l|schen Wie bringt mor. derm nun eff* Bild auf die Seite? 
wieder eine Dom ouf. In diese binnen dann ohne Probleme Bilder ous ei 
Bilder betrachtet tieoPubl-.-h o's Objekt, so dV hier die selberr Eigenschfl 


lextobjebten 


Diese Seite beispielsweise wurde mit GeoPubüsh erstellt. Die Bilder stamm 


Bild 6. Geowrite 2.0 wird zusammen mit vielen Erweiterun¬ 
gen als Writer’s Workshop ausgeliefert 


stick fest. Jede Maske kann sich dabei über ein Arbeitsblatt 
erstrecken, das insgesamt acht Bildschirme umfaßt. Ähn¬ 
lich wie bei Geopaint, können Sie auch hier alle Bereiche 
getrennt bearbeiten. Zusätzlich läßt sich in die einzelnen 
Datensätze Geopaint-Grafik einbauen. Dateien also nicht 
nur für die reine Information, sondern auch für das Auge. 
Ein ausgefeiltes Suchsystem und die gewohnt einfache Be¬ 
dienung über Pull-Down-Menüs runden das überaus positi- 



Bild 8. Geodex - einfache Adreßverwaltung 



Bild 9. Ein nützliches Utility ist der Kalender des Deskpack, 
darin lassen sich wichtige Termine eintragen 
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Bild 7. Die Zeichensätze des Fontpack 1 lassen in ihrer 
Vielfalt und Originalität keine Wünsche offen 


ve Gesamtbild ab. Geofile kann zurecht als eine der größten 
Errungenschaften der Geos-Programmierer bezeichnet 
werden. 

Geos hat sich durch seinen Bedienungskomfort und die 
Vielzahl der bereits erhältlichen und noch geplanten Appli¬ 
kationen zu einem echten Profisystem gemausert. Ver¬ 
gleichbar nur mit anderen grafischen Benutzeroberflächen 
für PCs oder 16-Bit-Heimcomputer. Geos zeigt ein weiteres 


mal, was auch in den »kleinen Computern« wie C64 und 
C128 steckt. Ein echtes Kraftpaket für den Einsteiger, wie 
auch für den Profi. Man darf gespannt sein, was sich die 
Programmierer von Geos noch alles einfallen lassen. An 
der Qualität besteht schon jetzt kein Zweifel. (rf) 


Alle vorgestellten Produkte sind bereits oder in Kürze erhältlich* bei: Markt&Technlk Verlag AG, 
Hans-Plnsel-Str. 2,8013 Haar. Geos 1.3 deutsch, 59 Mark, Update 39 Mark; Fontpack 1,49 Mark; 
Deskpack 1 mit Geodex, 69 Mark; Wrlter's Workshop, 89 Mark; Geolile, 89 Mark; Geopublish, 99 
Mark; Geos 128,119 Mark 
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Bild 10. Geofile - gelungene Datenbank mit Grafikeinbin¬ 
dung und professionellem Anstrich 
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LISTINGS 


Vokabel-Trainer 

Die Zeiten des öden Vokabelpaukens sind vorbei: 
Mittels der fast genialen Lernmethode unseres 
Vokabel-Trainers haben Sie selbst die schwierig¬ 
sten Vokabeln nach kurzer Zeit in Griff — und ha¬ 
ben obendrein noch Spaß dabei. 

E in Vokabel-Trainingsprogramm für Computer muß, 
wenn es einen Nachhilfelehrer ersetzen soll, eine Viel¬ 
zahl von Bedingungen erfüllen. Es muß beispielsweise 
gewußte und nichtgewußte Vokabeln unterscheiden und 
gesondert behandeln. Nichtgewußte Vokabeln müssen er¬ 
neut oder häufiger als andere abgefragt werden. Ein gutes 
Programm sollte weiterhin Mehrfachbedeutungen der Vo¬ 
kabeln verwalten und bei der Abfrage erkennen können. Es 
müßte aber vor allen Dingen leicht zu bedienen sein. Eine 
selbsterklärende Menütechnik mit einem Hilfsbildschirm 
kann hiervon großem Nutzen sein. Gute Programme zeich¬ 
nen sich weiterhin dadurch aus, daß sie alle zu erwarten¬ 
den Bedienungs- und Eingabefehler abfangen. Ein »Aus¬ 
stieg« des Programms aufgrund einer nicht eingeschalte¬ 
ten Diskettenstation ist bei professionellen Programmen 
ausgeschlossen. 

Professionell 


Mit einem solchen Lernprogramm, das all diese Bedin¬ 
gungen erfüllt und darüber hinaus noch weitere komforta¬ 
ble Unterprogramme bietet, können Sie effektiv und preis¬ 
wert Vokabeln der meisten Fremdsprachen lernen. 

Bei der Eingabe der Vokabeln können Sie entscheiden, 
ob später alle eingegebenen Übersetzungen gefordert wer¬ 
den — beispielsweise bei unregelmäßigen Verben — oder 
nur eine mögliche Entsprechung. Im ersten Fall werden 
Mehrfachbedeutungen mit Leerzeichen, andernfalls mit 
Kommata oder Strichpunkten voneinander getrennt. 

Das wichtigste Plus des Programms ist, wie bereits ange¬ 
deutet, die getrennte Verwaltung von gewußten und nicht 
gewußten Vokabeln. 

Bei der Abfrage wird nun zufällig, hauptsächlich aus dem 
zweiten Kasten mit den nicht gewußten Vokabeln, ausge¬ 
wählt. Übersetzen Sie richtig, wird das Wortpaar mit einem 
Index versehen und in den ersten Kasten umsortiert. Bei 
der Auswahl werden zwar überwiegend die noch nicht ge¬ 
wußten Vokabeln abgefragt, jedoch auch die gewußten; 
und zwar mit fallender Häufigkeit, bis sie nacheinander 
fünfmal als gewußt abgelegt wurden. Erst dann gilt eine Vo¬ 
kabel als gelernt und wird überhaupt nicht mehr abgefragt. 
In der linken oberen Ecke des Bildschirms wird angezeigt, 
wie oft die gerade angezeigte Vokabel bereits richtig über¬ 
setzt wurde. Wird eine einmal oder bereits mehrmals ge¬ 
wußte Vokabel falsch eingegeben, kommt sie sofort wieder 
in den Kasten für nicht gewußte Vokabeln. Auf diese Weise 
können Sie nachhaltig und dauerhaft lernen, da nicht ge¬ 
wußte Vokabeln häufig und so lange abgefragt werden, bis 
sie gelernt sind; bereits gewußte Vokabeln werden zur Prü¬ 
fung des Lernerfolgs eingestreut, bis sie wirklich »sitzen«. 
Darüber hinaus können Sie diesen »Lernstand« auf Disket¬ 
te speichern, so kann man beispielsweise am nächsten Tag 
an der Stelle fortfahren, an der man am Tag zuvor aufgehört 
hat. 

Auf Bewertung und Benotung wurde bewußt ver¬ 
zichtet. Das Lernen der Vokabeln erfolgt in kleinen Lektio¬ 


nen (jeweils maximal 99 Wortpaare plus Mehrfachbedeu¬ 
tungen pro Datei). Um einen hohen Lernerfolg sicherzu¬ 
stellen, wird die Datei vor der Abfrage in zwei »Karteikästen« 
aufgeteilt. In den ersten werden die gewußten, in den zwei¬ 
ten die nicht gewußten abgelegt. 

Die Bedienung des Programms ist so einfach, daß es kei¬ 
ner langen Einarbeitung bedarf. Erwartet der Computer 
Eingaben, wird der Bildschirmrand blau, ansonsten ist er 
schwarz. Über die Funktionstasten können die Programm¬ 
unterpunkte angewählt werden, die jeweils in einer Menü¬ 
leiste auf dem Bildschirm ausgegeben werden. Diese ent¬ 
hält auch eine Hilfszeile, in der beispielsweise Fehlermel¬ 
dungen bei Disketten-Operationen ausgegeben werden. 
Mit der »-«-Taste können Sie jederzeit auf einen Hilfsbild¬ 
schirm umschalten, in dem etwa wichtige Hinweise wie die 
Funktionstasten-Belegung stehen. 



^3 


Bei der Erstellung des Programms wurde besonderer 
Wert auf die Übersichtlichkeit des Listings gelegt. Dadurch 
kann man die Programmstruktur leicht nachvollziehen und 
das Programm bei Bedarf erweitern. 

Programm-Funktionen 


Das Hauptmenü enthält folgende Programmunterpunk¬ 
te, die mit den Funktionstasten und den Ziffern 1 bis 6 auf¬ 
gerufen werden. 

<F1 >: Neue Vokabeldatei einrichten 

Mit diesem Programmpunkt können Sie eine neue Datei 
mit maximal 99 Vokabeln erstellen und auf Diskette spei¬ 
chern. Auf dem Bildschirm erscheint dazu eine Eingabe¬ 
maske. Eingegeben werden können sowohl Groß- als auch 
Kleinbuchstaben. Existieren mehrere Bedeutungen einer 
Vokabel, werden diese mit Kommata oder Strichpunkten 
getrennt. Einzelne Buchstaben können mit der <DEL>- 
Taste gelöscht werden. Mit < RETURN > gelangen Sie je¬ 
weils in das nächste Feld. In einem gesonderten Feld (links 
oben am Bildschirm) wird die Anzahl der eingegebenen 
Wortpaare angezeigt. Während der Eingabe können Sie 
mit den Funktionstasten vor-(< Fl > und <F2>)und zu¬ 
rückblättern (<F3> und <F4>), die angezeigten Voka¬ 
beln ändern (< F5 >) oder löschen (< F7 >). Die »Vokabeln 
ändern«-Funktion enthält noch eine Besonderheit. Haben 
Sie dieses Unterprogramm mit <F5> angewählt und 
drücken danach < RETURN >, gelangen Sie in ein »Voka¬ 
beln suchen«-Unterprogramm. Hier können Sie die zu än¬ 
dernde Vokabel, ob deutsch oder englisch, eingeben, wor¬ 
aufhin der Computer sämtliche Wörter durchsucht, bis er 
dieses gefunden hat. 
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Wollen Sie weitere Vokabeln eingeben, blättern Sie mit 
< Fl > oder < F2 > vor, bis der Bildschirm wieder eine lee¬ 
re Maske zeigt. Mit <F8> gelangen Sie ins Hauptmenü. 
Haben Sie die Daten nicht zuvor mit <F6> gespeichert, 
macht der Computer eine Sicherheitsabfrage, ob die Datei 
gespeichert werden soll. Geben Sie hierzu den Dateina¬ 
men (maximal 13 Zeichen) ein und drücken < RETURN >. 
Die Daten werden als sequentielle Datei automatisch mit ei¬ 
ner Kennung vor dem Dateinamen (»vo.«) auf Diskette ge¬ 
speichert. Befindet sich hierauf bereits eine Datei mit glei¬ 
chem Namen, werden Sie gefragt, ob Sie diese überschrei¬ 
ben möchten. Bei »N« für Nein werden Sie aufgefordert, 
einen neuen Namen einzugeben. Sie können sich an die¬ 
ser Stelle auch das Inhaltsverzeichnis ansehen (<F7>). 
Haben Sie genau 99 Vokabeln eingegeben, springt das 
Programm automatisch auf »Datei speichern«. Wurde die¬ 
ser Programmpunkt aus Versehen mit <F6> angewählt, 
können Sie mit <F8> (Menü) wieder in den Eingabemo¬ 
dus zurückkehren. 

<F3>: Bestehende Datei ändern 

In diesem Programmteil können Sie eine bestehende 
Datei laden, verändern (also Vokabeln ändern, ergänzen 
oder löschen) und wieder speichern. Hier gelten die glei¬ 
chen Bedingungen wie oben. Wichtig ist, daß zu ändernde 
Vokabeln vollständig überschrieben werden müssen, da 
nur Textzeichen von der Tastatur akzeptiert werden. Die 
Cursor-Tasten besitzen keine Funktion. 

<F5>: Vokabeln abfragen. 

Zunächst werden Sie aufgefordert, den Dateinamen der 
zu lernenden Lektion einzügeben. Da es möglich ist, eine 
Datei im aktuellen »Lernzustand« zu speichern, können Sie 
nun entscheiden, ob Sie die Vokabeln neu lernen oder beim 
gespeicherten Stand weitermachen wollen. Daraufhin kön¬ 
nen Sie zwischen Deutsch-Englisch und Englisch-Deutsch, 
wählen. Nach einer kurzen Sortier-Routine kann es losge¬ 
hen. Der Computer fragt nun (nach dem anfangs beschrie¬ 
benen Prinzip) alle Vokabeln ab. Nach Eingabe der Über¬ 
setzung und < RETURN > zeigt der Computer alle (!) ge¬ 
speicherten Bedeutungen an und gibt aus, ob Ihre Eingabe 
richtig oder falsch war. Kennen Sie die Bedeutung einer Vo¬ 
kabel nicht, drücken Sie nur < RETURN >. Nach dem 
Druck auf eine beliebige Taste wird das nächste Wort abge¬ 
fragt. Mit <F1 > können Sie diesen Programmpunkt ver¬ 
lassen und den momentanen Zustand speichern; mit 
<F8> gelangen Sie ins Hauptmenü ohne Speichern. 
<F7>: Drucken 

Dieser Programmpunkt ermöglicht es, Vokabeldateien 
auf einem MPS 801 auszugeben. Die Routine kann jedoch 
auch leicht an andere Druckertypen angepaßt werden. 
Hierzu brauchen lediglich die Parameter in Zeile geändert 
zu werden. Die Variablen bedeuten: 

Dl = Breitschrift an 

D2 = Breitschrift aus GA = Gerätenummer 

SL = Seitenlänge SA = Sekundäradresse 

Haben Sie dieses Unterprogramm mit < F7 > aufgeru¬ 


fen, können Sie den Namen der zu druckenden Datei ein¬ 
geben. Durch erneutes Drücken von <F7> können Sie 
sich vorher das Inhaltsverzeichnis der Diskette anzeigen 
lassen. Mit <F8> gelangen Sie zurück ins Hauptmenü. 
Nach dem Laden drücken Sie bitte <F1 > zum Drucken 
(oder < F8> zum Verlassen dieses Unterprogramms). Die 
Vokabeln werden in der gespeicherten Reihenfolge zwei¬ 
spaltig ausgedruckt. Um die Orientierung zu erleichtern, 
wird zwischen der deutschen und der englischen Vokabel 
jeweils eine Punktreihe ausgegeben. 

Nach dem Druckvorgang gelangen Sie an den Anfang 
dieses Unterprogramms und können weitere Dateien aus- 
drucken oder mit < F8 > zurück ins Hauptmenü gelangen. 
<1> bis <6>: Diskettenbefehle 
Dieses Befehlsmenü erlaubt die wichtigsten Disketten¬ 
operationen: 

1: Inhaltsverzeichnis (Directory) 

2: Filenamen ändern (Rename) 

3: Files löschen (Scratch) 

4: Formatieren (New) 

5: Validieren (Validate) 

6: Initialisieren (Initialize) 

Bei der Directory-Routine hat man die Möglichkeit, sich 
mit < Fl > das komplette Inhaltsverzeichnis (auch ge¬ 
löschte Files) und mit <F3> nur Vokabeldateien anzeigen 
zu lassen. Ist eine Bildschirmseite vollgeschrieben (15 
Directory-Einträge), kann man mit <F7> weiterblättern. 
Der Disketten-Name und die Anzahl freier Blocks wird oben 
in der Titelzeile angezeigt. 

Sollen Vokabeldateien umbenannt oder gelöscht wer¬ 
den, muß unbedingt die Kennung »vo.« vorangestellt wer¬ 
den. 

Beim Formatieren sind der Diskname und die neue ID 
einzucjchen. Hat man diesen Programmpunkt nur verse¬ 
hentlich angesprungen, gelangt man mit < F8 > zurück ins 
Hauptmenü. 

Hinweise zum Abtippen 


Geben Sie bitte Listing 1 mit dem Checksummer ein. 
Beachten Sie dazu die Eingabehinweise auf Seite 158. 
Alle Programmzeilen mit führendem REM oder mit nur ei¬ 
nem Doppelpunkt sind sicherheitshalber mit einzugeben, 
da sie teilweise als Ansprungsziele dienen. 

Nach dem Start des Programms bleibt der Bildschirm 
kurze Zeit dunkel, während der Computer die Masken auf¬ 
baut und zwei kurze Maschinenprogramme initialisiert. Die 
verwendeten Variablen und deren Bedeutung entnehmen 
Sie bitte Tabelle 1. Es ist empfehlenswert, das Programm 
vor dem Gebrauch zu kompilieren. Zuletzt sei noch darauf 
hingewiesen, daß sich auf der Programmservice-Diskette 
zu diesem Heft neben dem Vokabel-Trainer (Basic- und 
kompilierte Version) zusätzlich ein Grundwortschatz von 16 
Lektionen befindet. (Alfred Schnabel/M. Jobst/sk) 


t$ 

= Überschrift 

z 

= Laufvariable 

z$ 

= Zielfile für COPY 

xn$ 

= variable Ausgabestrings 

dn 

= neue Datei (j/n) (1/0) 

fi$ 

= Name der aktuellen Datei 

X 

= PRINT AT-Position X 

en 

= Textlänge (UP Texteingabe) 

dn$ 

= Variable für Directory 

xe 

= ASC(X$) bei Eingabe 

vn 

= Vokabelzahl 

by 

= Bit-Position in Directory 

y 

= PRINT AT-Position Y 

a$ 

= Deutsch/Englisch {die) 

ft$() 

= Filetyp für Directory 

x$ 

= variabel verwendet 

ng 

= letzte nicht gewußte Vokabel 

bf 

= Blocks free für Directory 

bS 

= für Directory lesen 

dy 

= Position Deutsch 

s$ 

= speichern/ laden 

1 

= Laufvariable 

ey 

= Position Englisch 

<e 

= Fehlernummer (Disk) 

i 

= Laufvariable 

xd$ 

= abgefragte Variable 

f$ 

= Fehler (Disk) 

k 

= Laufvariable 

xe$ 

= Übersetzung von xdS 

t 

= Track (Disk) 

1 

= Laufvariable 

qq 

= Flagge 

s 

= Sektor (Disk) 


Tabelle 1. Liste der verwendeten Variablen 
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1000 

1010 

1020 

1030 

1040 

1050 

1060 

1064 

1066 

1070 

1080 

1090 

1100 

1110 

1120 

1130 

1140 

1150 


REM"-(3SPACE>HDKABELTRAINER BY: C3SPAC 
E>3 <187> 

REM"—(4SPACEJBLFRED SCHNABEL{5SPACEJ- <130> 


REM"- aMTON-VON-HEHNER-S.TR. 5 - 
REM"c; 8813 HCHILLINGSFUERST(2SPACE>- 
REM" = <3SPACE>IEL. (09868) 1030 MSP ACE 
>= 

REM " 

F=54272:FL=F:FH=F+1:W=F+4:A1=F+5:H=F+ 
6 :FOR A=F TO F+24:P0KE A,0:NEXT 
POKE F+24,15 
: 

POKE 53281,0:POKE 53280,0:POKE 646,0 
PRINT"(CLR >" 

GOSUB 7370: GOSUB 7520: REM "dt*. 1NIT 44 
POKE 650,128:B0SUB 4000 


REM " 

REM" = .PROGRAMM<2SPACE>**» SPEEDER **# 
(2SPACE }3 

1160 REM" = (2SPACE>£INZEILER AUS DER 64'ERC 
3SPACE} = 

1170 : 

1180 


CLOSE 1:OPEN 1,8,15,"M-W"+CHR$(7)+CHR 
*<28>+CHR*(l)+CHR*(15):CLOSE 1 


<003 > 

< 146> 

< 012 > 

<006> 

< 184> 

< 112 > 
<030> 
<003> 
<062> 
<171> 
<070> 
<214> 

< 090 > 
<149> 

< 085 > 

<211 > 
<130> 


1190 

1200 

1210 

1220 

1230 

1240 

1250 

1260 

1270 

1280 

1290 

1300 

1310 

1320 

1330 

1340 

1350 

1360 

1370 

1380 

1390 

1400 

1410 

1420 

1430 

1440 

1450 

1460 

1470 

1480 

1490 

1500 

1510 

1520 

1530 

1540 

1550 

1560 

1570 

1580 

1590 

1600 

1610 

1620 

1630 

1640 

1650 

1660 

1670 


REM " T.« »»♦<«».♦* »inimnn^t««innmn7 
REM "£4 HRUNDMASKE ** 


< 220 > 
<150> 

< 190> 

< 170> 
<248 > 

= <190> 

POKE 53280,0:POKE 646,1:POKE 53265,32 <232> 
QGNQQ+1 <232> 

POKE 53281,IsPRINT"<CLR>"j:POKE 53281 

.6 

FÜR 1=1063 TO 1983 STEP 40:POKE 1,93: 

POKE 1+1,93:NEXT 

POKE 1024,112:POKE 1104,109:POKE 1144 
,112:POKE 1824,109 
POKE 1864,112:POKE 1984,109 
POKE 1063,110:POKE 1143,125:POKE 
,110:POKE 1863,125 
POKE 1903,110:POKE 2023,125 
FOR 1 =1025 TO 1062 

: POKE 1,64:POKE 1+80,64: POKE 1+120, 

64:POKE 1+800,64 
: POKE 1+840,64:POKE 1+960,64 
NEXT 

IF QQ=2 THEN 1390 
GOSUB 7650:REM"ÜILF-flASKE LADEN" 

GOTO 1250 
POKE 53265,27 


< 173> 


< 010 > 


<047> 

n 83 ."bn 
< 220 > 
<197> 
< 100 > 


.1, 


REM “ Wiliä+HäS 

REM" = (2SPACE > BENUE(2SPACE >- 

T*="fl E N U E" 

GOSUB 3660:GOSUB 3770:REM"IITELB. " 

PR I NT " {HOME, 5D0WN, RIGHT >£.1 = HEUE HOK 
ABELDATEI EINRICHTEN" 

PRINT"(RIGHT}£3 = BESTEHENDE HOKABELD 
ATEI AENDERN" 

PRINT"(RIGHT>£3 = VOKABELN ABFRAGEN" 
PRINT"(RIGHT>£7 = BRUCKEN" 

PRINT"(DOWN,RIGHTJflISK-flENUE: " 

PRINT"(2RIGHTJ1 = HIRECTORY 
PRINT" (2RI GHT >2 = ÖLEN AMEN AENDERN" 
£ILES LOESCHEN" 
BORMATIEREN" 
HALIDIEREN" 
INITIALISIEREN" 
PRINT"(DOWN,RIGHT>£8 = £NDE" 

POKE 211,1:POKE 214,22:SYS 58640 
PRINT"BITTE WAEHLEN SIE EINEN BENUEPU 
NKT" 

GOSUB 3890: REM"GET" 

: IF XX=133 THEN DN=1:G0T0 1880 

: IF XX=134 THEN 1720 

: IF XX=135 THEN 2260 

: IF XX=136 THEN 8800 

: IF XX=140 THEN 8760 

: XX=VAL(X*):IF XX=0 OR XX>6 THEN 161 


PRINT"(2RIGHT>3 
PRINT"(2RIGHTJ4 
PRINT"(2RIGHTJ5 
PRINT"(2RIGHT>6 


<203> 
<231 > 

<090> 

<216> 
<241 > 
<242> 

< 139> 

< 106> 

< 167> 
<073> 
<078> 
<146> 
< 200 > 
<046> 

< 210 > 

< 172> 

< 15B> 

<072> 

< 141 > 

< 171 > 
<237> 

< 151 > 

< 127> 
<029> 
< 020 > 
<235> 
<053> 

<006> 

< 155> 

< 003 > 
<009> 
<077> 
<041 > 
<216> 


1770 

1780 

1790 

1800 

1810 


1820 


B <081> 

1680 : ON XX GOTO 7920,7970,8260,8410,8600 

.8690 <053> 

1690 : <142> 

1700 REM"££ HOKABELN EINGEBEN/AENDERN <150> 

1710 : <162> 

1720 T*="HOKABELN AENDERN":GOSUB 3660 <113> 

1730 GOSUB 4820:REM"BATEI LADEN“ <094> 

1740 IF XE=140 THEN 1410 <213> 

1750 IF VN>99 THEN I=VN:XE=133:GOTO 1920 <037> 

1760 IF FE<>62 THEN 1900 <180> 

s <222> 

: GOSUB 3810:REM"ÜILFZ“ <022> 

: CLOSE 2 <026> 

: GOSUB 3810: REM"ÜILFZEILE" <094> 

: PRINT"(2UP,RIGHTJHATEI(SPACE,RVSON, 

SPACE >"N*"(SPACE,RVOFF,SPACE > E XISTIER 
T NICHT." <223> 

: PRINT"(RIGHT>SDLL HATEI EINGERICHTE 
T WERDEN ? (J/N>" <156> 

1830 GOSUB 3890: REM"GET" <121> 

1840 : IF X*="J" THEN DN=1:FI*=N*:GOSUB 

3660: GOTO 1910 <055> 

1850 : IF X*="N" THEN 1410 <128> 

1860 GOTO 1830 <246> 

1870 : <068> 

1880 FI*="":T*="HEUE HOKABELDATEI" <108> 

1890 GOSUB 3660 <116> 

1900 IF DN=0 THEN 1920 <207> 

1910 I=1:VN=1 <104> 

1920 X*="HDERTER BISHER EINGEGEBEN" <040> 

1930 GOSUB 4460:REM"HOKABEL-BASKE” <062> 

1940 GOSUB 4530 <062> 

1950 GOSUB 5980 <049> 

1960 IF I>99 THEN I=VN:XE=134:GOTO 6080 <080> 

1970 IF XE=140 THEN 2000 <145> 

1980 : <178> 

1990 I=VN <188> 

2000 : GOSUB 5720:REM"HOK. ERFASSEN" <046> 

2010 : IF XEO140 THEN 2060 <129> 

: IF D$(l>=". '• THEN 1410 <052> 

: GOSUB 7280 <047> 

: IF X*="J" THEN 2210 <034> 

: IF X*="N" THEN 1410 <074> 

: IF XE=139 THEN 2140 <074> 

: IF XE=133 OR XE=134 OR XE=137 OR XE 
=138 THEN 6050 <174> 

: IF XE= 136 THEN XE=134:G0T0 6090 <129> 

2090 GOSUB 4530: REM"HDKABEL—BASKE" <144> 

2100 1=1+1:VN=VN+1 <067> 

2110 IF I<=99 THEN 2000 <144> 

2120 GOTO 2170 <020> 

2130 : <074> 

2140 IF D$(l>=". " THEN 2000 <182> 

2150 GOTO 2210 <130> 

2160 : , <104> 

2170 GOSUB 3810:REM"BILFZEILE" <054> 

2180 PRINT"(2UP,RIGHT>"SPC(12)"(RVSON,SPAC 

EIHATEI VOLL(SPACE,RVOFF>" <172> 

2190 GOSUB 3890: REM"SET" <229> 

2200 GOSUB 5980: REM"ÜILFZEILE £ING." <217> 

2210 GOSUB 7030: REM"HATEI SPEICHERN" <045> 

2220 IF XE=140 THEN I=VN:GOTO 1940 <105> 

2230 CLR:GOSUB 7370: REM"UMIT" <036> 

2240 GOTO 1410 <244> 

2250 : <194> 

2260 REM " W.*.*.».».»»«**«»♦«■«♦»***♦*• ? <221> 

2270 REM" = (2SPACE>HDKABELN ABFRAGEN(2SPACE 

>= <033> 

2280 REM" ?4.W.W.W.W4.*4.«.».W.y <252> 

2290 : <234> 

2300 T*="HDKABELN ABFRAGEN" <021> 

2310 GOSUB 3660:GOSUB 3770:REM"IITELB. " <136> 

2320 X*="HDKABELN ABGEFRAGT" <011> 

2330 GOSUB 4490: REM"HOKABEL-BASKE" <051> 

2340 GOSUB 4820: REM"HATEI LADEN" <198> 

2350 : IF XE=140 THEN 1410 <037> 

2360 : IF FE=0 THEN 2400 <189> 

2370 : PRINT"(RIGHTJHATEI EXISTIERT NICH 

T" <206> 

2380 : GOSUB 3890: REM"HET" <215> 

2390 : GOTO 2340 <074> 

Listing 1. »Vokabeltrainer« Bitte mit dem MSE 
(Seite 158) eingeben 
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2400 GQSLIB 3770: X*="VOKABELN ABGEFRAGT":GO 

SUB 4490 <075> 

2410 GOSUB 3810: REM"ÜILFZEILE" <040> 

2420 PRINT“{2UP,RIGHT,RVSON,SPACEJF{SPACE, 

RVOFF,SPACE1ÜQKABELN FRISCH ABFRAGEN 
ODER" <239> 

2430 PRINT"{RIGHT,RVSONJTATTRVOFF,SPACE>SO 

WIE GESPEICHERT ?“ <208> 

2440 GOSUB 3890: REM"SET“ <225> 

2450 : IF X*="F" THEN 3530 <052> 

2460 : IF X*="A" THEN 2490 <226> 

2470 GOTO 2440 <068> 

2480 : <170> 

2490 GOSUB 3810: REM"ÜILFZEILE“ <120> 

2500 PRINT"{2UP,RIGHT,RVSON,SPACE >D{SPACE, 

RVOFF,SPACE>= DEUTSCH12SPACE>-> £NGLI 
SCH{3SPACE,RVSON 5! (BSPACE,RVOFF >" < 243> 

2510 PRINT“{RIGHT,RVSONJTET<RVOFF,SPACE>= 
.ENGLISCH -> DEUTSCH {4SPACE,RVSON>!MEN 
UE<3SPACE>" <219> 

2520 GOSUB 3890: REM"GET" <047> 

2530 : IF X*="E" THEN PRINT"{2UP>";:GOTO 2 

570 <101> 

2540 : IF X*="D" THEN PRINT"<UP>"; :GOTO 2 

570 <170> 

2550 : IF X*="{F8>" THEN 2260 <006> 

2560 GOTO 2520 <112> 

2570 PRINT" {RIGHTJÜDMENT BITTE, ICH SORTIE 

•RE." <006> 

2580 A*=X* <141> 

2590 GOSUB 4650: REM"ÜE SORTIEREN" <061> 

2600 GOSUB 3810: REM"ÜILFZEILE“ <232> 

2610 PRINT" {2UP-RIGHT} ’ .KEXILSX ' NICHT GEWUS 

ST" <190> 

2620 PRINT"<RIGHT>'£1' ABFRAGE BEENDEN" <077> 
2630 : <066> 

2640 1=1 <049> 

2650 POKE 211,2:POKE 214,5:SYS 58640 <136> 

2660 :PRINT RIGHT*(STR*(I),LEN(STR®(I))-1) 

;:IF I<10 THEN PRINT" " <124> 

2670 : . <106> 

2680 REM"±± VOKABEL AUSSUCHEN «*♦«**♦*» <220> 

2690 IF NG=0 THEN 3330: REM"ALLE GEWUSST <043> 

2700 K=INT(RND<1)*NG)+1 <070> 

2710 IF A*="D" THEN Yl=l1:Y2=16:XD*=D*(K): 

XE*=E*(K) <243> 

2720 IF A*="E" THEN Yl=16:Y2=l1:XD*=E*(K): 

X£*=D*(K> <098> 

2730 X=VAL(MID*<XD*,2,1)) <093> 

2740 XD*=RIGHT*(XD*,LEN(XD*)—2> <250> 

2750 XE*=RIGHT*(XE*,LEN(XE*)—2) <142> 

2760 IF X>=5 THEN XY=1:X=X-1:GOTO 3190 <064> 

2770 : <206> 

2775 PRINT"JCLR,DOWN,RIBHT>C"X"3" <023> 

2780 POKE 211,2:POKE 214,Y1:SYS 58640 <173> 

2790 PRINT XD* <234> 

2800 POKE 211,2:POKE 214,Y2:SYS 58640 <066> 

2810 EN=36:PO=P+Y2*40+2:GOSUB 4240:REM"£IN 

G. <248> 

2820 IF XE=133 THEN 3610 <177> 

2830 : <012> 

2840 REM"Ü BEWUSST ODER NICHT ? .♦_*.»»». <189> 

2850 POKE 211,1:POKE 214,Y2:SYS 58640 <245> 

2860 PRINT"{GREEN >"X3*"{WHITE >“:PRINT"{UP, 

2RIGHTJ"; <248> 

2870 PRINT XE*:IF N*=""THEN 3050 <159> 

2880 X*=XE* <113> 

2890 J=1 <049> 

2900 : IF MID*(X*,J,1>="(" THEN 2940 <079> 

2910 J=J+1:IF J<=LEN<X*> THEN 2900 <145> 

2920 GOTO 2960 <154> 

2930 : <112> 

2940 X*=LEFT*(X*,J—1) <200> 

2950 IF RIGHT*<X*,1)=" " THEN X*=LEFT*(X*, 

LEN(X*)-1):GOTO 2950 <244> 

2960 J=1 <119> 

2970 : IF MID*(X*,J,1) ="; " THEN 3000 <154> 

2980 J=J+1:IF J>LEN(X*) THEN 3000 <088> 

2990 GOTO 2970 <000> 

3000 IF N*=LEFT*(X*,J-1> THEN 3160 <217> 

3010 IF J>LEN <X*) THEN 3050 <131> 

3020 X*=RIGHT*(X*,LEN <X*>—J) ' <142> 

3030 GOTO 2960 <008> 

3040 : <222> 


3050 REM"££ ÜICHT GEWUSST S* <104> 

3060 : <242> 

3070 IF X>0 THEN X=X-1 <211> 

3080 XD*="."+RIGHT*<STR*<X),1)+XD* <081> 

3090 IF A*="D"THEN D*CK>=XD* <069> 

3100 IF A*="E"THEN E*<K)=XD* <211> 

3110 POKE 211,13:POKE 214,Y1~2:SYS 58640 <092> 

3120 PRINT"£ALSCH " <106> 

3125 POKE Al,100:POKE H,150:POKE FH,4:POKE 
FL,90:POKE W,33:F0R A=1 TO 600:NEXT: 

POKE W,0 <151> 

3130 POKE 198,0:WAIT 198,1 <054> 

3140 GOTO 3270 <048> 

3150 : <078> 

3160 REM"ü BEWUSST ü ‘ <235> 

3170 : . <098> 

3180 X=X+1:IF X=5 THEN X=8 <184> 

3190 XD*="="+RIGHT*(STR*<X),1)+XD* <070> 

3200 IF A*="D“ THEN XE*=E* <l<) : D* (K) =D* <NG) 

:E*(K>=E*(NG>:D*(NG)=XD*:E*(NG)=XE* <187> 

3210 IF A*="E" THEN XE*=D*<K>:D*<K)=D*(NG) 

:E*(K)=E*(NG):D*(NG)=XE*:E*(NG)=XD* <067> 

3215 IF XY=1 THEN XY=0:NG=NB—1:GOTO 2650 <175> 

3220 POKE 211,13:POKE 214,Y1-2:SYS 58640 <202> 

3230 PRINT"HICHTIG" <139> 

3235 POKE Al,25::POKE H,68:POKE FH,29:POKE 

FL,69:POKE W,33:F0R A=1 TO 400:NEXT <198> 
3240 NG=NG-1 <254> 

3245 POKE W,0:POKE FH,23:POKE FL,59:POKE W 

,33:FOR A=1 TO 300:NEXT:POKE W,0 <156> 

3250 POKE 198,0:WAIT 198,1 <174> 

3260 : <188> 

3270 1=1+1 <205> 

3280 POKE 211,13:POKE 214,Y1-2:SYS 58640 <006> 

3290 PRINT"{7SPACE >" <139> 

3300 GOSUB 4530: REM"J'OKABELMASKE" <212> 

3310 GOTO 2650 <210> 

3320 : <248> 

3330 REM"üi ALLE VOKABELN GEWUSST *£ <129> 

3340 : <014> 

335? FOR K=1 TO VN-1 <15B> 

3360 . IF A*=“D" THEN D*(K)="."+RIGHT*(D*( 

K),LEN(D*<K))-l) <071> 

3370 : IF A*="E" THEN E*(K>="."+RIGHT*(E*( 

K),LEN(E*(K)> —1) <202> 

3380 NEXT K <178> 

3390 NG=VN—1 <089> 

3395 FOR K=1 TO NG <165> 

3400 IF A*="D" AND LEFT*(D*<K>,2)<".5" THE 

N QX=1:GOTO 3415 <145> 

3410 IF A*="E“ AND LEFT*(E* (K> ,2)<".5" THE 

N QX=1 <209> 

3415 NEXT K <213> 

3420 IF QX=1 THEN QX=0:GOTO 2650 <132> 

3430 : <104> 

3440 REM"Ü ALLE ÜQK. 5 MAL GEWUSST <062> 

3450 : <124> 

3460 GOSUB 3810: REM"ÜILFZEILE" <074> 

3470 PRINT"<2UP,RIGHT>AIE BEHERRSCHEN DIES 

E LEKTION. HOLLEN" <232> 

3480 PRINT“{RIGHTJÜIE DAMIT WEITERARBEITEN 

? <J/N>" <158> 

3490 GOSUB 3890: REM"BET“ <003> 

3500 : IF X*="J" OR X*="N" THEN 3530 <072> 

3510 GOTO 3490 <005> 

3520 : • <194> 

3530 FOR 1=1 TO VN-1 <066> 

3540 : D* <I) = ". "+RIGHT*(D*(I),LEN(D*(I) > — 

2) <068> 

3550 : E*(I)=". "+RIGHT*(E*(I),LEN(E*(I) ) — 

2) <086> 

3560 NEXT I <0B6> 

3570 NG=VN-1 <013> 

3580 IF X*=“N" THEN 3610 <084> 

3590 GOTO 2490 <079> 

3600 : <020> 

3610 REM"Äi AATEI NEU SAVEN ±» <140> 

3620 : <040> 

3630 GOSUB 7030: REM“5ATEI SAVEN" <057> 

3640 GOTO 1410 <120> 

3650 : <070> 

3660 REM"±i ÜE IITELBILD i* <229> 

3670 : <090> 

3680 POKE 211,0:POKE 214,1:SYS 58640 <148> 


62 
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LISTINGS 


3690 

3700 

3710 

3720 

3730 

3740 


3750 

3760 

3770 

3780 

3790 

3800 

3810 

3820 

3830 

3840 

3850 

3860 

3870 

3880 

3890 

3900 

3910 

3920 

3930 

3940 

3950 

3960 

3970 

3980 

3990 

4000 

4010 

4020 

4030 

4040 

4050 

4060 

4070 

4080 

4090 

4100 

4110 

4120 

4130 

4140 

4150 

4160 

4170 

4180 

4190 

4200 

4210 

4220 

4230 

4240 

4250 

4260 

4270 

4280 

4290 

4300 


PRINT XI* 

IF FI*="“ THEN X=20—LEN(T*>/2 

IF FI*>"“ THEN X=22—(LEN<FI*)+2)/2—LE 

N(T*>/2 

POKE 211,X:POKE 214,1:SYS 58640 
PRINT T*; 

IF FI*>"“ THEN POKE 211,37-LEN(FI*):P 
OKE 214,1:SYS 58640:PRINT"(RVSONJC"FI 
*"3 (RVOFF>“ 

RETURN 

: 

POKE 211,0:POKE 214,4:SYS 58640 
FOR L=1 TO 15:PRINT X1*:NEXT 
POKE 211,1:POKE 214,19:SYS 58640 
PRINT"(RVSON Jt«-3 = ÜILFSFUNKTIONCI9SP 
ACE,RVOFF 3“ 

POKE 211,0:POKE 214,22:SYS 58640 
PRINT X1*:PRINT XI* 

RETURN 

: 

POKE 211,0:POKE 214,22:SYS 58640 
PRINT X4*:PRINT X4* 

RETURN 


4310 


4320 

4330 


4340 

4350 


4360 


REM" ü S£ GET X* *-♦.* 

POKE 198,0:POKE 53280,6 
GET X*:IF X*="“THEN 3920 
: XX=ASC(X*) 

: IF X*="«-" THEN SYS 49152:POKE 198,0 
:WAIT 198,1:SYS 49152 
POKE 53280,0 
RETURN 

REM"±4 KE FEHLERKANAL AUSLESEN ££ 

POKE 2,8:SYS 49194 

: IF PEEK(2)=0 THEN 4080 

: GOSUB 3810: REM 11 ÜILFZEILE“ 

: PRINT"(2UP.RIGHTJSITTE SCHALTEN SIE 
DIE ELOPPY EIN" 

: PRINT"<RISHT)UND LEGEN SIE DIE SÄTE 
NDISKETTE EIN." 

: POKE 19B,0:WAIT 198,1 
GOTO 4000 

INPUT#9,FE,F*,T,S 
: IF FE=0 OR FE=31 THEN RETURN 
: GOSUB 3B10: REM"ÜILFZEILE" 

: PRINT"£2UP,RIGHT > »FE"(SPACE,RVSON,S 
PACE}"F*“(SPACE,RVOFF,SPACEJ"T; S 
: IF FE=1 THEN 4140 

: PRINT"(RIGHTJEEHLER BESEITIGEN UND 
XASTE DRUECKEN." 

: GOSUB 3890: REM"SET" 

GOTO 3980 

REM"üt KE SÄTEINAMEN EINGEBEN ** 

GOSUB 3810:EN=14: REM"ÜILF2EILE" 
PRINT"(2UP,RIGHT>SATEINAME: “X5*"(5SP 
ACE,RVSON >!DIRECTOR(RVOFF J" 

PRINT S* SPC(18)"(RVSON>!MENUE(3SPACE 
>" 

PRINT"(2UP>"SPC(12 )f 
QQ=1:P0=1916 

REM"ü U£ TEXTEINGABE »>>>_«>>_,«>> 

POKE 198,0 
Z=l:Z1=12B:N*="“ 

: POKE PO,PEEK(PO)+Z1 
: GET X*:IF X*="" THEN 4280 
: XE=ASC(X*) 

: IF XE=95 THEN SYS 49152:P0KE 198,0: 
WAIT 198,1:SYS 49152:POKE 198,0:GOTO 
4280 

: IF XE=136 AND QQ=1 THEN GOSUB 5200: 
GOTO 4170 
: QQ=0 

: IF XE=13 OR (XE>132 AND XE<141) THE 
N POKE PO,PEEK(PO)-128:RETURN 
: IF XEO20 THEN 4390 

: IF Z=1 THEN POKE PO,PEEK(PO)-128: 

GOTO 4260 

: Z=Z-1 :POKE PO,PEEK(PO)-ZI:PO= 


<069> 

<233> 

4370 

4380 

<090> 

4390 

<208> 

<095> 

4400 

4410 

4420 

< 142> 

4430 

<252> 

< 180> 

4440 

< 175> 

4450 

<145> 

4460 

<032> 

4470 

4480 

<203> 

4490 

< 113> 

4500 

<107> 

4510 

<076> 

4520 

<006> 

4530 

< 155> 

4540 

<203> 

< 118> 

4550 

<046> 

4560 

<110> 

<066> 

<096> 

4570 

<230> 

4580 

<006> 

4590 

< 196> 

< 190> 
<208> 

4600 

< 136> 

< 132> 

4610 

< 156> 

4620 

<201 > 

4630 

< 196> 

4640 

<026 > 

4650 

4660 


m 

< 190> 

4690 

< 166> 

4700 

<214> 

4710 

<236> 

4720 

<230> 

4730 

<155> 

4740 

<108> 

4750 

4760 

< 146> 

4770 

<067> 

4780 

4790 

< 114> 

4800 

< 197> 

4810 

<187> 

4820 

<072> 

4830 

<054> 

4840 

<092> 

4850 

<220> 

4860 

4870 

<055> 

4880 

<016> 

4890 

<075> 

4900 

< 150> 

4910 

<022> 

4920 

<094> 

<027> 

4930 

<091 > 

4940 

< 120> 

4950 

<063> 

4960 

4970 

4980 

<078> 

4990 

5000 

<129> 

S010 

<233> 

5020 

5030 

<220> 

5040 

< 128> 

5050 

5060 

< 182> 



PO-1:PRINT"(GREEN >.(2LEFT,WHITE >" 5 
: N*=LEFT*(N*,LEN(N*)—1) 

: GOTO 4270 

: IF XE<31 OR (XE>127 AND XEC161) THE 
N 4280 

: IF XE=44 THEN X*=”;“ 

: N*=N*+X*:PRINT X*; 

Z=Z+l:PO=PO+l:IF Z<=EN THEN 4270 
Z=Z-1:PO=PO-1:PRINT"(LEFT,SPACE,LEFT > 
" 5 :GOTO 4370 
RETURN 
: 

REM"&S KE VOKABELN—BASKE ** 

: 

GOSUB 3770: REM"SUNDMASKE" 

POKE 211,0:POKE 214,4:SYS 58640 
PR I NT " (RIGHT > 

PRINT"£RIGHT>—(4SPACE)— "X* 

PRINT" (RIGHT> ?.*A««y " 

POKE 211,0:POKE 214,8:SYS 58640 
POKE 646,5 

PRINT"(RIGHT 3KüäiüäiS": PRINT" (RIGHT 
>=SEUTSCH 

PR I NT " £R I GHT 3 H ’*,**««*»». ?•" LEFT* (X2*, 27) 
"S" 

PRINT"(RIGHT3“X3*:PRINT"(RIGHT 3 T' X2*" 
7 " 

POKE 211,0:POKE 214,13:SYS 58640:POKE 
646,5 

PRINT" (RIGHT> g»-«».«.*.»* g" : PRINT" (RIGHT 
J^SNGLISCH^" 

PRINT"(RIGHT 3 n LEFT* (X2*, 27 > 

" 5 “ 

PRINT”£RIGHT >"X3*:PRINT"(RIGHT 3?"X2*" 
V“ 

POKE 646,1 
RETURN 

REM"Ü K£(SHIFT—SPACEJSQRTIEREN ** 

J=1:K=VN-1 
IF A*="E" THEN 4710 
: IF LEFT*(D*(J),1)="." THEN 4770 
: GOTO 4720 

: IF LEFT*(E*(J),1)="." THEN 4770 
: X*=D*(K):D*(K)=D*(J):D*(J)=X* 

: X*=E*(K>:E*(K)=E*(J):E*(J)=X* 

: K=K—1 

: IF K=J THEN 4800 

GOTO 4690 

J=J+1 

IF J=K THEN 4800 
GOTO 4690 
RETURN 
: 

REM"ä£ SS SATEI LADEN &£ 

S*="(RIGHT>(LADEN 3(4SPACE >" 

GOSUB 4170: REM"SATEINAME EINS." 

IF XE=140 THEN RETURN 

IF (XE= 13 AND N*="") OR XE<>13 THEN 

4840 

IF N*=FI* THEN RETURN 
GOSUB 3980: REM"EEHLERKANAL" 

CLOSE 2:OPEN 2,8,2,"VO."+N*+",S,R" 
GOSUB 4080: REM"BEHLERKANAL" 

GOSUB 3810: REM"ÜILFZEILE” 

PRINT" (2UP,RIGHT JiDADING(SPACE,RVSON, 
SPACE J"N*"(SPACE,RVOFF >" 

IF FE>0 THEN RETURN 

DN=0 

VN=0 

FI*=N* 

INPUT#2,NG 
VN=VN+1 

: INPUT#2,D*(VN) 

: INPUT#2,E*(VN) 

IF (ST AND 64)064 THEN 4990 

CLOSE 2 

VN=VN+1 

GOSUB 3660: REM"XITELBILD" 

RETURN 


Listing 1. »Vokabeltrainer« (Fortsetzung) 


<125> 

<105> 

<224> 

<042> 

<220> 

<248> 

<213> 

<014> 
< 180> 
<108> 
<226> 
< 128> 
<253> 

< 133> 
<176> 
<235> 

< 159> 

< 174> 
<155> 

< 183> 
<090> 

< 145> 

< 194> 
< 220 > 

< 130> 

< 1B7> 
<235> 

< 116> 

< 134> 
<134> 
<064> 
<206> 

< 121 > 
<058> 
<129> 
<142> 
<035> 

< 130> 
<000> 
<074> 
<025> 
<201 > 
<063> 
<055> 
<030> 
<214> 

< 130> 
<234> 
<253> 
<230> 
<217> 

< 106> 
<0B0> 
<137> 
<239> 
<021 > 
< 010 > 

<056> 
<201 > 
<048> 

< 130> 
<04B> 

< 153> 
<064> 
<219> 
<037> 
<046> 
<223> 

< 175> 

< 149> 
<036> 
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5070 

: 

<220> 

5790 

: IF XE=139 OR XE=133 OR XE=134 OR XE 


5080 

REM"iÄ 2IRECT0RY ANZEIGEN 

<033> 


=137 OR XE=138 OR XE=140 THEN RETURN 

< 165> 

5090 

: 

<240> 

5800 

: IF XE=136 THEN 5840 

< 132> 

5100 

D*=.S=0:XN*=" . 

< 183> 

5810 

IF XE=13 AND PQ=1466 THEN GOTO 6570 

< 115> 

5110 

GOSUB 3850: REM"HILFZEILE" 

<072> 

5820 

: IF (XE=135 OR XE=13) AND N*="" THEN 


5120 

PRINT"<2UP,RIGHT,RVSON}GANZE SIR!NUR 



GOTO 5760 

<090> 


aATEI"SPC(ll)XN* 

< 141 > 

5830 

: GOTO 5870 

<101> 

5130 

PRINT SPC(31)"{RVSONIZURUECK{RVSON,HO 


5840 

: IF N*="" THEN RETURN 

<016> 


ME! " 

<096> 

5850 

: GOSUB 4530:GOTO 5760 

<106> 

5140 

GOSUB 3890: REM"GET" 

< 129> 

5860 

s 

<248> 

5150 

: IF XX=136 THEN IF S>0 THEN GOSUB 37 


5870 

POKE 211,2:POKE 214,16:SYS 58640 

<080> 


70:GOTO 5210 

<099> 

5880 

: EN=36:P0=1666:GOSUB 4240:REM"£INGAB 


5160 

: IF XX=133 THEN D*=“":GOTO 5210 

< 189> 


E" 

<012> 

5170 

: IF XX=134 THEN 5200 

< 137> 

5890 

: E* <I)=”. “+N* 

< 170> 

51B0 

: IF XX=140 THEN RETURN 

<034> 

5900 

: IF XE=133 OR XE=134 OR XE=137 OR XE 


5190 

GOTO 5140 

<226> 


=138 THEN RETURN 

<101> 

5200 

D*="VO." 

< 199> 

5910 

: IF XE=136 THEN 5950 

<036> 

5210 

GOSUB 3770: REM"1ITELB" 

<134> 

5920 

: IF <XE=13 OR XE=135 OR XE=139) AND 


5220 

Z=1:IF XX=136 THEN PRINT”{HOME,3D0WN} 



N*="" THEN 5870 

<101> 


":GOTO 5620 

< 154> 

5930 

FI*="" 

< 236 > 

5230 

: 

<126> 

5940 

: RETURN 

< 190> 

5240 

FT * (0) = "..ÜEL..":FT*(1)=",§EQUENTIAL": 


5950 

: IF N*="" THEN 5850 

<052> 


FT*(2)="£ROGRAM":FT*(3)="ÜSER" 

<059> 

5960 

GOSUB 4580:GOTO 5870 

<095> 

5250 

FT*(5)="£ELATIVE" 

<005> 

5970 

: 

<104> 

5260 

CLOSE 2:DN*="" 

<021 > 

5980 

REM"3Ut ALE. HILFSZEILE HOK.EINGABE 

< 108> 

5270 

PRINT#9,"I" 

<082> 

5990 

: 

< 124> 

5280 

GOSUB 3980: REM"EEHLERKANAL" 

<017> 

6000 

GOSUB 3850:REM"ÜILFSZEILE" 

<224> 

5290 

GOSUB 3810: REM"HILFZEILE" 

< 126> 

6010 

FRINT"<2UP,RIGHT,RVSON,SPACE}1 VOR{3S 


5300 

OPEN 2,8,2,"#" 

<229> 


PACE}! 1 RUECK !AENDERN{2SPACE}!LOESC 


5310 

PRINT#9,"U1 2 0 18";S 

<120> 


HEN{RVOFF}" 

<231 > 

5320 

PRINT#9,"B—P 2 144" 

<231 > 

6020 

PRINT"{RIGHT,RVSON}10 VOR{3SPACE}!10 


5330 

FOR 1=0 TO 15:GET#2,X*:IF X*="<SHIFT- 



RUECK !SPEICHERN!MENUE{3SPACE,RVOFF}" 

<172> 


SPACEJ" THEN 5360 

<096 > 

6030 

RETURN 

<246> 

5340 

: REM”I3SPACE}f=’5HIFT' —'SPACE' !!" 

< 188> 

6040 

: 

<174> 

5350 

: DN*=DN*+X* 

< 146> 

6050 

REM"±* HE HOKABELN BLAETTERN £± 

<245> 

5360 

NEXT I 

<108> 

6060 

: 

< 194> 

5370 

PRINT"CHOME,DOWN}"X1*"{HOME,DOWN,RIGH 


6070 

IF XE=133 AND I=VN THEN 2000 

<047> 


T}"DN*:PRINT:PRINT 

<183> 

6080 

IF XE=133 THEN 1=1+ l:GOTO 6120 

<072> 

5380 

: 

<022> 

6090 

IF XE=134 THEN 1=1- 1:GOTO 6160 

< 147> 

5390 

S=1:BF=664 

< 190 > 

6100 

IF XE=137 THEN I=I+10:GOTO 6120 

<229> 

5400 

PRINT#9,"Ul 2 0 18",-S 

m 

6110 IF XE=138 THEN 1=1-10:GOTO 6160 

6120 IF 1> 99 THEN 1=99 

<080 > 

5410 

PRINT#9,“B-P 2 0":BY=0 

<076> 

5420 

GET#2,X*:T=ASC(X*+CHR*(0)> 

<068> 

6130 

IF I>=VN THEN 1940 

<086> 

5430 

GET#2,X*:S=ASC(X*+CHR*(0)) 

<076> 

6140 

GOTO 6180 

<039> 

5440 

DN*="" 

<030> 

6150 

: 

<030> 

5450 

BY=BY+5:PRINT#9,"B—P 2";BY 

<201 > 

6160 

IF Kl THEN 1 = 1: GOTO 6130 

<091 > 

5460 

FOR 1=0 TO 15:GET#2,X*:DN*=DN*+X*:NEX 


6170 

s 

<050> 


T I 

<088> 

6180 

POKE 211, 2:POKE 214, 5:SYS 58640 

<U0> 

5470 

IF LEN(DN*)=0 THEN 5670 

<012> 

6190 

PRINT RIGHT*(STR*(I),LEN(STR*(I))—1 ; 


5480 

BY=BY+25:PRINT#9,"B—P 2";BY 

< 131 > 


IF I<10 THEN PRINT" " 

< 102> 

5490 

GET#2,X*:X=ASC < X*+CHR*(0)> 

< 146> 

6200 

GOSUB 4530: REM"HOKABELMASKE" 

<064> 

5500 

GET#2,X*:X=X+ASC(X*+CHR*(0))*256 

<088> 

6210 

POKE 211,2:POKE 214,11:SYS 58640 

< 037 > 

5510 

IF X< 10 THEN DN*=DN*+" " 

< 182> 

6220 

PRINT RIGHT*(D*(I>,LEN(D*(I>> —2) 

<203> 

5520 

IF X<100 THEN DN*=DN*+" " 

< 134> 

6230 

POKE 211,2:POKE 214,16:SYS 58640 

<188> 

5530 

DN*=DN*+STR*(X)+" BL. “ 

< 108> 

6240 

PRINT RIGHT*(E* <I) ,LEN(E*(I))—2) 

<031 > 

5540 

BF=BF—X:IF BF<0 THEN BF=0 

<192> 

6250 

GOSUB 3890: REM"GET" 

<223> 

5550 

BY=BY—28:PRINT#9,"B-P 2";BY 

<079> 

6260 

: XE=ASC <X*) 

<001> 

5560 

GET#2,X* 

<081 > 

6270 

: IF XE=135 THEN FI*="":GOTO 6360 

<023> 

5570 

DN*=DN*+FT*(ASC ( X*+CHR*(0))AND 3) 

<038> 

6280 

: IF XE=136 THEN ..GOTO 6390 

< 132> 

5580 

IF D*="VO."AND LEFT* <DN*,3)<>D* THEN 


6290 

: IF XE=140 THEN GOSUB 7280 

<244> 


5620 

< 172> 

6300 

: IF X*="J" THEN 2210 

<232> 

5590 

PRINT"{RIGHT}"DN* 

<232 > 

6310 

: IF X*="N" THEN 1410 

<014> 

5600 

Z=Z+1:IF Z<16 THEN 5620 

<082> 

6320 

: IF XE=139 THEN 2210 

<190> 

5610 

XN*="{RVSONIWEITER":GOTO 5110 

<062> 

6330 

: IF XE=133 OR XE=134 OR XE=137 OR XE 


5620 

BY=BY+30 

<162> 


=138 THEN 6080 

<126> 

5630 

IF BY<255 THEN 5440 

<219> 

6340 

GOTO 6250 

<160> 

5640 

IF T=0 OR T>35 THEN 5670 

< 177> 

6350 

: 

<230> 

5650 

GOTO 5400 

<098> 

6360 

GOSUB 5720:REM"HOKABELN ERFASSEN" 

<128> 

5660 

: 

<048> 

6370 

GOTO 6050 

<158> 

5670 

CLOSE 2:XN*="{RVS0N,6SPACE}" 

<007> 

6380 

: 

<004> 

5680 

PRINT"{HOME,DOWN}"SPC(26) BF".äL. FREE 


6390 

REM"** HDKABEL LOESCHEN *»»*>_»*» 

<213> 



<152> 

6400 

IF 1 = 1 AND D* <I)="" THEN 6180 

< 173> 

5690 

IF QQ=1 THEN RETURN 

<054> 

6410 

GOSUB 3810: REM"HILFZEILE" 

<230> 

5700 

GOTO 5100 

<100> 

6420 

PRINT"{2UP,RIGHT}HIRKLICH LOESCHEN ? 


5710 

- 

<098> 


(J/N) 

<004> 

5720 

REM"** ü£ HDKABELN ERFASSEN ü* 

<233> 

6430 

GOSUB 3890: REM"GET" 

< 149> 

5730 

. 

< 118 > 

6440 

: IF X*="J" THEN 6470 

< 118> 

5740 

POKE 211, 2:POKE 214, 5:SYS 58640 

< 17B> 

6450 

: IF X*="N" THEN 6550 

<084> 

5750 

: PRINT RIGHT*(STR*(I),LEN(STR*(I))-l 


6460 

GOTO 6430 

<250> 


!; : IF K10 THEN PRINT" " 

< 166 > 

6470 

IF VN=100 THEN D*(99)="":E*(99)="":GO 


5760 

: POKE 211,2:POKE 214,11:SYS 58640 

< 002 > 


TO 6520 

< 164> 

5770 

: EN=36:P0=1466:GOSUB 4240:REM"£INGAB 


6480 

IF VN=2 THEN ... :GO 



E" 

<094> 


TO 6520 

<205> 

5780 

: IF N*>"" THEN D*(I)=". "+N* 

< 157> 

6490 

FOR J=I TO VN—1 

<245> 


64 
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6500 

6510 

6520 

6530 

6540 

6550 

6560 

6570 

6580 

6590 

6600 

6610 

6620 

6630 

6640 

6650 

6660 

6670 

6680 

6690 

6700 

6710 

6720 

6730 

6740 

6750 

6760 

6770 

6780 

6790 

6800 

6810 

6820 

6830 

6840 

6850 

6860 

6870 

6880 

6890 

6900 

6910 

6920 

6930 

6940 

6950 

6960 

6970 

6980 

6990 

7000 

7010 

7020 

7030 

7040 

7050 

7060 

7070 

7080 

7090 

7100 

7110 

7120 

7130 

7140 

7150 

7160 


7170 

7180 

7190 

7200 

7210 

7220 

7230 

7240 

7250 

7260 


: D*(J)=D*(J+1):E*(J)=E*CJ+1) 

NEXT 

: VN=VN-1:IF I=VN THEN 1940 
: IF VN< = 1 THEN VN=1:B0T0 1940 
: IF I<=1 THEN 1=1 
EOSUB 5980 
GOTO 6180 

3 

REM"SS 5JJCHROUTINE «>■«»*»»»>«»»»» 

: 

X$=".5JJCHROUTINE": GOSUB 4460 
Q9=I 

POKE 211,2:P0KE 214,11:SYS 58640 
EN=36:P0=1466sGOSUB 4240 
X=LEN(N*> 

1 = 1 

sIF NS=“"THEN 6900 

:GOSUB 4530sD*=RIGHT$(D#<I),LEN(D*(I> 
>-2)s E*=RIGHT* <E*(I>,LEN(ES(I)>-2) 
sPOKE 211,2sPOKE 214,llsSYS 58640 
SPRINT D* 

sPOKE 211,2sPOKE 214,16sSYS 58640 
SPRINT £* 

SPOKE 211,2sPOKE 214,5sSYS 58640SPRIN 
T I 

sIF X>LEN(DS)THEN 6760 
:X*-D*sGOSUB 6950 
sIF J>0 THEN 6800 
sIF XM.EN(EDITHEN 6870 
:X$=E$:GOSUB 6950 
:IF J=0 THEN 6870 
REM GEWUSST 

sPOKE 211,2sPOKE 214,22s SYS 58640 
5 PRINT"WEITERSUCHEN (J/N) ?" 
sGOSUB 3890 

sIF X$="J"THEN GOSUB 3810s GOTO 6870 
sIF X*="N"THEN 6920 
s GOTO 6820 


1=1 + 1 

IF 1=100 THEN 6900 
IF I<100 AND DS(I)>' 
I=Q9s GOTO 6920 


< 199> 
<170> 

< 194> 
<077> 
< 220 > 
<077> 
<207> 
<196> 
<006> 
<216> 

< 194> 

< 102 > 

< 193> 
<047> 
<039> 
<249> 
<188> 

< 191 > 

< 162> 
< 210 > 

< 187> 
<246> 

<223> 

< 220 > 

<060> 

< 118> 
<092> 
<154> 
<208> 
<105> 

< 156> 
< 222 > 
<204> 

< 129> 

< 188> 
<056> 
<232> 
<249> 


"THEN 6670 


X*="ÜOERTER BISHER EINGEGEBEN" 

GOSUB 44603GOSUB 5980:GOTO 6120 

J=1 

IF N*=LEFT*(XS,LENIN*))THEN RETURN 
IF MID*(X$,J,1)=";"THEN 7000 
J=J+1:IF J>LEN(X$)THEN 7020 
GOTO 6970 

X*=R IGHT* (X*, LEN (X*)-J) 

GOTO 6960 
J=0sRETURN 

REM“SS UE 23ATEI SPEICHERN SS 
: 

S*="{RIGHT> CSPEICHERN 3" 

GOSUB 4170: REM"SÄTEINAME EING. " 

IF XE=140 THEN RETURN 
GOSUB 3980s REM”AEHLERKANAL" 

CLOSE 2sOPEN 2,8,2,"VO."+NS+",S,W" 
GOSUB 4080: REM"AEHLERKANAL" 

IF FE=0 THEN 7200 

s GOSUB 3810: PRINT" <2UP,RIGHT).SATEI E 
XISTIERT BEREITS !" 

: PRINT"{RIGHTJflLTE AATEI UEBERSCHREI 
BEN ? (J/N) 

GOSUB 3890s REM"GET" 

IF X$="N"THEN 7050 

IF X*="J"THEN PRINT#9,"S:VO."+N*: CLOS 
E 2:OPEN 2,8,2,"VO."+NS+“,S,W"sGOTO 7 
180 

GOTO 7140 

GOSUB 3810: REM"BILFSZEILE" 

PRINT"{2UP,RIGHT >SAVING{SPACE,RVSON,S 
PACE >"NS"{SPACE,RVOFF>" 

PRINT#2,VN—1 
FOR J=1 TO VN—1 
s PRINT#2,D*(J> 
s PRINT#2,E$(J) 

NEXT J 
CLOSE 2 
RETURN 


<204> 
<097> 
<026> 
<216> 
<009> 
<058> 
<045> 
<236> 
<246> 
<048> 
<224> 
<058> 
< 212 > 
<077> 
<009> 

< 158> 
<042> 

< 154> 

< 141 > 
<039> 

< 151 > 

< 179> 

< 193> 


<008> 

< 190> 
<095> 

< 130> 


<040> 

<190> 

<006> 

<236> 

<038> 

< 200 > 

<067> 

< 141 > 

< 220 > 

< 157> 
<206> 


7270 s 

7280 REM"SS UP{SHIFT-SPACEJSATEI NICHT GES 
PEICHERT 
7290 : 

7300 GOSUB 3810: REM"ÜILFZEILE" 

7310 PRINT" {2UP,RIGHT)£ATEI IST NOCH NICHT 
GESPEICHERT !!" 

7320 PRINT"{RIGHTJSDLL DATEI GESPEICHERT W 
ERDEN ? (J/N)" 

7330 GOSUB 3890: REM"GET" 

7340 IF XSO"J" AND X*<>"N" THEN 7330 
7350 RETURN 
7360 : 

7370 REM"SS ü£ INIT ÜAR. + BASCHPGE. SS 
7380 : 

7390 REM "SS IN IT VARIABLEN ♦■»■»«»**»♦»» 

7400 : 

7410 DIM D*(99),E*(99) 

7420 X1S="{RIGHT,38SPACE>" 

7430 X2*="SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
SSSS" 

7440 X3S=" = . 

7450 X4S="{RIGHT,RVSON,9SPACE)!{9SPACE}!{9 
SPACE >!{8SPACE,RVOFF >" 

7460 X5*=".» 

7470 P=1024 

7480 PRINT CHR*(14)CHR*(8>; 

7490 CLOSE 9:OPEN 9,8,15 
7500 RETURN 
7510 s 

7520 REM "SS IN IT BASCH. PROGRAMME .*-*-*-*.» 

7530 : 

7540 REM"BILDSCHIRMCHANGER" 

7550 DATA 169,0,133,87,169,4,133,88,169,56 
,133,89,169,199,133,90,160,0,177,87 
7560 DATA 170,177,89,145,87,138,145,89,200 
,208,243,230,88,230,90,169,8,197,88 
7570 DATA 208,231,96 

7580 FOR 1=49152 TO 49193:READ XsPOKE I,Xs 
U; 759„ s EXT 

7600 REM"FLOPPY AN/AUS" 

7610 DATA 169,1,160,192,162,33,32,189,255, 

169.1.160.15.166.2.32.186.255.32 
7620 DATA 192,255,176,2,169,0,133,2,169,1, 

32.195.255.96.32 

7630 FOR 1=49194 TO 49227:READ XsPOKE I,X: 

NEXT 
7640 : 

7650 REM"SS ÜILFSANZEIGE SS 
7660 s 

7670 PRINT"{HOME,DOWN >"SPC(14)"ÜILFS—TAFEL 

7680 PRINT"{2D0WN,RIGHTJC£83{SPACE,RVSONIM 
ENUE{RVOFF,SPACEIFUEHRT IN DIE LETZTE 
flNWEN- 

7690 PRINT"{RIGHT)DUNG ODER DAS LETZTE BEN 
UE ZURUECK." 

7700 PRINT"{RIGHT) - 


7710 PRINT"{RIGHT)IM £ISK-BENUE IST JEWEIL 
S DER VOLLE{3SPACE>" 

7720 PRINT"{RIGHT)PROGRAMMNAME ZU VERWENDE 
N. ANSONSTEN{2SPACE)" 

7730 PRINT"{RIGHT)WIRD BEI .VOKABELDATEIEN 
DIE .KENNUNG {3SPACE)" 

7740 PRINT"{RIGHT,RVSON,SPACE)VO. £SFACE,RV 
OFF,SPACE)NICHT MIT EINGEGEBEN !!{9SP 
ACE)" 

7750 PRINT" {RIGHT)- 


7760 PRINT"{RIGHT)IRITT EINE AEHLERMELDUNG 
DURCH DIE{4SPACE)" 

7770 PRINT"{RIGHT)£LOPPY AUF UND WERDEN KE 
INE BASSNAHMEN" 

7780 PRINT"{RIGHT)ERKLAERT, VERFAHREN SIE 
BITTE NACH DEM" 

7790 PRINT" {RIGHT)^DIENUNGSHANDBUCH ZUR £ 
LOPPY 1541.{3SPACE)" 


Listing 1 . »Vokabeltrainer“ (Fortsetzung) 


< 134> 

<023 > 

< 154> 

< 104> 

<2^5> 

< 135> 
<031 > 
<218> 
<040> 
<224> 

< 193> 
<244> 
< 110 ) 
<008> 
<217> 
<23B> 

<255> 

< 148> 

<0S2> 

< 112 > 
<253> 
<082> 

< 190> 

< 192> 

< 120 > 
<066> 

< 140> 
<01B> 

< 177> 

<017> 

< 010 > 

<188> 

<200> 

< 212 > 

< 143> 

<076> 

<086> 

<250> 

< 136> 

<014> 

<072> 


<070> 
< 106> 
<090> 
< 147> 

<053> 

< 202 > 


<042 > 
<140> 
<215> 
<224> 

< 169> 

< 129> 
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7300 PRINT"{RIGHT} 
7310 


<190> 


PRINT" {2D0WN,RIGHT,RVSON>C*-] = ZÜRUEC 
K INS .PROGRAMM{12SPACE,RVOFF}“ 

7820 POKE 211,0!POKE 214,22:SYS 58640 
7330 PRINT"{RIGHT,RVSON,2SPACE } C£1 ]C3SPACE 
>!{2SPACE> CF33{3SPACE }!{2SPACE 5 t£5 3 <3 
SPACE } ! C2SPACE >[£,71{2SPACE, RVOFF > " 
7840 PRINT"{RIGHT,RVSON,2SPACE}CF2 3{3SPACE 
}!{2SPACE)CF4 3{3SPACE >!{2SPACE3CF63{3 
SPACE J!C2SPACE } C£8 3{2SPACE,RVOFF >" 

SYS 49152 
RETURN 


7850 

7860 

7870 

7880 

7890 

7900 

7910 

7920 

7930 

7940 

7950 

7960 

7970 

7980 

7990 

8000 

8010 

8020 

8030 

8040 

8050 

8060 

8070 

8080 

8090 

8100 

8110 

8120 

8130 

8140 

8150 

8160 

8170 

8180 

8190 

8200 

8210 

8220 

8230 

8240 

8250 

8260 

8270 

8280 

8290 

8300 

8310 

8320 

8330 

8340 

8350 

8360 

8370 

8380 

8390 

8400 

8410 

8420 

8430 

8440 

8450 

8460 

8470 

8480 

8490 


REM" 

REM"=:{2SPACE>£ISKETTEN-fJENUE{2SPACE>^ 
REM " 
t 

REM" j££ SIRECTORY 
: 

GOSUB 5080: REM"£1RECTORY" 

GOTO 1410 
: 

REM-'ää FILENAMEN AENDERN **_**.«*»* 


■X5 


QQ=1:GOSUB 5080:00=0: REM"£IR." 

GOSUB 3810: REM"ÜILFZEILE" 

PRINT"{2UP,RIGHT}£1SHERIGER KÄME: 

.. * 

POKE 211,18:POKE 214,22:SYS 58640 
EN=17:P0=1922:GOSUB 4240:REM"FING. 

IF XE=140 THEN 1410 

IF XE<>13 THEN PRINT:GOTO 8010 

IF N$="" THEN 1410 

A*=N* 

PR I NT: PR I NT " {RI GHT JiJEUER KÄME {5SPACE } 
: "X5*"...“ 

POKE 211,18:POKE 214,23s SYS 58640 
P0=1962:GOSUB 4243: REM"EINGABE“ 

IF XE=140 THEN 1410 

IF XE<>13 THEN PRINT" OJP}" ;: GOTO 8080 
GOSUB 3980: REM"FEHLERKANAL" 

PRINT#9,"R:"+N*+"="+A$ 

GOSUB 4080: REM"FEHLERKANAL" 

IF FE=63 THEN X*="BEREITS“:GOTO 8190 
IF FE=62 THEN Xi="NICHT":GOTO 8190 
GOTO 1410 

: GOSUB 3810: REM "ÜI LFZE I LE 11 

: PRINT“{2UP,RIGHT,RVSON,SPACE3FILE E 
XISTIERT "X*" ! ! {SPACE,RVOFF>" 

: PRINT"{RIGHT!CÜITTE IASTE DRUECKEN1 


< 011 > 

<059> 


<016> 


<192> 

<032> 

<042> 

<226> 

< 176> 
<032 > 
<162> 
< 010 > 

< 143> 
<030> 

< 180> 
< 112 > 
<062> 
<248> 
<082> 

< 141 > 
<042> 

<063> 

<236> 

<105> 

< 163> 

< 154> 
<240> 
<231 > 



: GOSUB 3890: 


REM"£ET" 


GOTO 8000 

: 

REM"KK FILES LOESCHEN *********** 

QQ=1:GOSUB 5080:QQ=0: REM"£1R." 

GOSUB 3810: REM"ÜILFZEILE" 

PRINT"{2UP,RIGHT>£0ESCHFILE : "X5*".. 

PRINT" {RIGHTJ CHENN FERTIG, ' AE-T-U.RK • D 
RUECKEN3." 

POKE 211,14:POKE 214,22:SYS 58640 
EN=17:P0=1918:GOSUB 4240:REM"£1NG. 

IF XE=140 THEN 1410 

IF N*=“" THEN 1410 

GOSUB 3980: REM"FEHLERKANAL" 

PRINT#9,"S:"+N* 

GOSUB 4080: REM"FIHLERKANAL" 

GOTO 8290 

REM"Ü FORMATIEREN 

GOSUB 3810: REM"ÜILFZEILE" 

PRINT"<2UP,RIGHT>KAME:"X5*“...{2SPACE 
}££:..{2SPACE,RVSON}!{7SPACE}" 

PRINT SPC <31) " {RVS0N3-! MENUE{SPACE,RV 
OFF,HOME}"; 

POKE 211,6:POKE 214,22:5YS 58640 
EN=17:PO=1910:GOSUB 4240:REM"FING. 

IF XE=140 THEN 1410 

IF XE<>13 THEN PRINT:GOTO 8430 


< 119> 

< 150> 
<215> 
<154> 
<173> 
<174 > 

< 137> 
<194> 
<224> 
<1B0> 

<231 > 

<089> 

<038> 

< 154> 
<017> 

< 183> 
<071 > 
<041 > 
<023> 
<227> 
<068> 
<0S3> 
<088> 
<064> 

<004 > 

< 177> 
<196> 

< 133> 

< 158> 
<088> 


8500 

8510 

8520 

8530 

8540 

8550 

8560 

8570 

8580 

8590 

8600 

8610 

8620 

8630 

8640 

8650 

8660 

8670 

8680 

8690 

8700 

8710 

8720 

8730 

8740 

8750 

8760 


8770 

8780 

8790 

8800 

8810 

8820 

8830 

8840 

8850 

8880 

8890 

8900 

8910 

8920 

8930 

8940 

8950 

8960 

8970 

8980 

8990 

9000 

9010 

9020 

9030 


A*=NS 

POKE 211,27:POKE 214,22:SYS 58640 
EN=3:P0=1931:GOSUB 4240:REM"FING. 
IF XE=140 THEN 1410 
IF XE<>13 THEN PRINT:GOTO 8510 
GOSUB 3980: REM“ FEHLERKANAL" 

PRINT#9,"N:"+A$+","+N4 
GOSUB 4080: REM"FEHLERKANAL" 

GOTO 1410 
: 

REM“Ä± KALIDIEREN »*>««»**_-»_»***»*. 


REM"FEHLERKANAL" 

REM"ÜILF Z EILE{2SPACE 


GOSUB 3980: 

GOSUB 3810: 

}“ 

PRINT" {2UPVSPC < 13) " {RVSON,SPACE}KALI 
DIEREN " 

PRINT49, "V" 

GOSUB 4080: REM"£EHLERKANAL" 

GOTO 1410 
: 

REM"ÄK IN 1TIALISIEREN *-»-*-*-*-*-*-*-*-*-*. 


GOSUB 3980: 
PRINT#9,"I" 
GOSUB 4080: 
GOTO 1410 


REM" FÜHLERKANAL" 
REM"FEHLERKANAL" 


< 153> 
<090> 

< 160> 

< 145> 
<201 > 
<241 > 
<016> 
<125> 
<234> 
<184> 

< 141 > 
<204> 
<055> 

< 164> 

<237> 

<227> 

<215> 

<06B> 

<018> 

< 135> 
<038> 
<147> 
<232> 
<031 > 
<140> 

< 090 > 


PRINT" <CLR}"X2T"{RVSON,7SPACE}.P. R 
OGRAMM-FND E{BSPACE,RVOFF}" 
X2T" »*>* " 

PRINT"{10DOWN}" 

POKE 53280,6:END 

REM " a»************»««-** " 

REM"- VOKABELN DRUCKEN 3 
REM " T***********«***»«»' ? 

D1=14:D2=15:SL=72:GA=4:SA=7 
T*=“£ RUCKEN“ 

GOSUB 3660:GOSUB 3770 

r .U8 9140: IF XE=140 THEN 1410 
GOSUB 3350:PRINT"{2UP,RIGHT,RVSON}£RU 
CKEN"SPC(23 >" CD0WN1ÜENUE" 

GOSUB 3890 

: IF XX=133 THEN 8930 
: IF XX=140 THEN 1410 
GOTO 8890 

GOSUB 3810:PRINT"<2UP,RIGHT}"SPC(6) "2, 
ITTE 5RUCKER VORBEREITEN " 

PRINT"{RIGHT}U£NN FERTIG:3ASTE DRUECK 
EN <£8=ZURUECK" 

GOSUB 3890 
IF XX=140 THEN 1410 

GOSUB 3850:PRINT"{2UP,RIGHT,RVSON}£AU 
SE"SPC(25)"ÜBBRUCH" 

POKE 2,4:SYS 49194 
IF PEEK(2)>0 THEN 8930 
ZZ=2:CLOSE 2:0PEN 2,GA,SA 
F'RINT#2,CHR« <D1) "K OKABELDAT 
E I"CHR*(D2)CHR*<13> 

FOR 1=1 TO VN—1 

: PRINT#2,RIGHTS<D*<I),LEN<D*(I)>-2)" 


9040 :PRINT#2,MID*<X3*,2,37-LEN<D*<I)>)" " 
5 

9050 : PRINT#2,RIGHT*<E*(I),LEN(E*CI))-2) 
9060 : GET XS:XX=ASC<X*+CHR*(0)):IF XX=133 
THEN POKE 198,0:WAIT 198,1 
9070 : IF XX=136 THEN 1=999:NEXT I:GOTO 

8800 

9080 : ZZ=ZZ+1:IF ZZ=SL-2 THEN PRINT#2,CHR 
*<13)CHR*<13):ZZ=1 
9090 NEXT I 

9100 PRINT#2,CHR*<13>"****»" 

9110 CLOSE 2 
9120 GOTO 8800 
9130 : 

9140 FE=0:XX=0:GOSUB 4820 
9150 IF FE>0 THEN 9140 
9160 RETURN 


Listing 1. »Vokabeltrainer« (Schluß) 


< 186> 
<182> 
< 186> 
<130> 

< 153> 
<079> 
<003> 

< 170 >. 
< 120 > 

< 107> 

< 140> 
<230> 

<044> 

< 131 > 
<029> 
<090> 

< 185> 

<019> 

< 106> 

< 191 > 

< 116> 

<094> 

<228> 

<243> 

< 146> 

< 146> 
<224> 

<245> 

< 086 > 

< 102 > 

<017> 

< 185> 

<094> 

<028? 

<039> 

<239> 

<098> 

<216> 

<043> 

< 185> 
<072> 
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C64 


LISTINGS 


Spiele und Effekte: Game-Basic 


Auch in Basic können Sie die tollsten Spiele 
schreiben. Unser Listing »Game Basic« hilft Ihnen 
dabei. Es wird dabei vor allem der Umgang mit 
Sprites und Sonderaeichen und die Bildschirm¬ 
verwaltung (Scrolling) unterstützt. 

D ie Grafik des C 64 läßt sich von Basic aus nur mit 
PEEK- und POKE-Befehlen ansprechen. Da mir da¬ 
bei diese nicht sehr komfortable »POKE«-rei auf die 
Nerven ging, habe ich nun eine Basic-Erweiterung ge¬ 
schrieben die, wie ich meine, diese Vorgänge um einiges 
erleichtert. 

Eingabe des Programms 

1) Das Programm »Game-Basic-COOO« (Listing 1) mit dem 
MSE eingeben (bitte Eingabehinweise auf Seite 158 beach¬ 
ten) und speichern. 

2) Nach dem Laden mit 

LOAD "GAME BASIC-C000"8,1 

das Programm mit »SYS 49152« starten. Das Programm ko¬ 
piert sich nun selbständig an den Basic-Start ab $0800. 

3) Das Programm nun mit SAVE ”GAME-BASIC”,8 (oder 
bei Kassette: ,1) speichern. 

Das Game-Basic kann nun ganz normal geladen und mit 
»RUN« gestartet werden. 

Die Befehle 


Der Befehl »RESET« bewirkt einen Neustart der Basic-Er¬ 
weiterung, wobei ein vorhandenes Basic-Programm nicht 
gelöscht wird. 

Da es gerade bei Basic-Erweiterungen leicht Vorkom¬ 
men kann, daß man einzelne Befehle vergißt und nicht im¬ 
mer eine Anleitung zur Hand hat, habe ich den Befehl 
HELP mit eingebaut. Er listet alle zusätzlichen Komman¬ 
dos auf. 

Auf HiRes-Befehle habe ich grundsätzlich verzichtet, da 
meine Erweiterung ja hauptsächlich für die Verwendung im 
Spiele-Bereich vorgesehen ist. Normalerweise ist es nicht 
üblich, ein Spielprogramm in HiRes-Grafik zu erstellen (au¬ 
ßer Loderunner und ein paar andere), sondern mit Hilfe von 
Sonderzeichen. Außerdem wäre das Programm dann um 
einiges länger. (Es genügen schon 2 KByte, wenn man sie 
abtippen muß.) 

Alle reinen Basic-Programme laufen natürlich auch mit 
der Erweiterung. Will man die Erweiterung trotzdem ab¬ 
schalten, ohne den Computer ausschalten zu müssen, so 
kann man das mittels des Befehls »BASIC« tun. Die Erwei¬ 
terung kann dann mit SYS 4096 wieder aktiviert werden, 
falls sie nicht aus irgendeinem Grund überschrieben 
wurde. 

Steuerzeichen entfallen 


Wer hat sich nicht auch schon über das lästige POKE 
53281 ,xx:POKE 53280,xx:POKE 646,xx... geärgert? Mit 
dem Befehl »COLOR« lassen sich Bild-, Rahmen- und Zei¬ 
chenfarbe ganz einfach einstellen. Zum Beispiel blauer 
Rahmen, weißer Hintergrund und grüne Schrift: COLOR 
6,1,5. Die Farb-Code entnehmen Sie bitte dem mitgeliefer¬ 
ten Handbuch Ihres C 64. 

Damit wären wir auch schon bei den Befehlen, die die 
Verwaltung des Bildschirms betreffen. 


Der Befehl »SCROFF« schaltet den Bildschirm aus; zum 
Beispiel während vom Programm ein Bild aufgebaut wird. 
Mit »SCRON« wird er wieder eingeschaltet. Die komplizier¬ 
te POKErei im VIC hat nun ein Ende. 

Mit »PAINT« wird der Farbspeicher für den Bildschirm mit 
der angegebenen Farbe gefüllt. Ein beschriebener Bild¬ 
schirm kann natürlich auch nachträglich umgefärbt wer¬ 
den. Man kann damit ganz hübsche Effekte erzielen. 

»REVERS« invertiert den Bildschirminhalt. 

Bildschirmmanipulationen 


Auch die lästigen Steuerzeichen entfallen mit der Erweite¬ 
rung bis auf RVSON und RVSOFF. (Aber auch die kann 
man durch POKE 199,1 beziehungsweise POKE 199,0 um¬ 
gehen.) Der Bildschirm wird nicht mehr mit PRINT CHR$ 
(147), sondern einfach mit »CLS« gelöscht. 

Mit dem Befehl »CLEAR« kann man sogar einzelne Zei¬ 
len beziehungsweise Zeilenblöcke löschen. Zum Beispiel 
»CLEAR 12,24« löscht den Bildschirm ab der 13. Zeile (die 
erste Zeile ist Zeile 0). 

Das Editieren von Programmen wird mit meiner Erweite¬ 
rung fast nicht unterstützt, da die Aufgabe der Expansion 
ja darin liegen soll, Spielprogramme in Basic schneller ab¬ 
laufen zu lassen. Mit dem Befehl »TAB« kann man zumin¬ 
dest die Übersicht in einem Listing etwas erhöhen. Es wird 
jeder Befehl in eine eigene Zeile geschrieben, was, die 
Übersicht betreffend, auch nicht zu verachten ist. Bevor 
man aann eine Zeile wieder ändern will, muß unbedingt 
durch einen erneuten »TAB«-Befehl diese Darstellung wie¬ 
der abgeschaltet werden. 

Die Befehle INC und DEC, also Inkrement (Erhöhen) und 
Dekrement (Erniedrigen) sind eine Abwandlung des PO- 
KE-Befehls. Es wird nicht wie bei POKE eine Zahl in eine 
Adresse geschrieben, sondern eine in einer Adresse vor¬ 
handene Zahl um den angegebenen Wert erhöht bezie¬ 
hungsweise erniedrigt. 

Sollte ein Programm für eine Sekunde anhalten, mußte 
man bisher eine umständliche Zeitschleife verwenden 
(FOR T = 1 T01000: NEXT). Diese wird nun durch den Be¬ 
fehl PAUSE ersetzt. 1 Sekunde Wartezeit = PAUSE 500. 

Zeichensatz verändern 


Jedes professionelle Spiel kommt nicht ohne Sonderzei¬ 
chen aus. Daher war es von vornherein klär, daß meine Er¬ 
weiterung Befehle zur Erstellung eines eigenen Zeichen¬ 
satzes enthalten sollte. Dabei ist die Darstellungsweise in 
Form von DATA-Zeichen die Übersichtlichste. Ich habe da¬ 
zu den Befehl »CODE« gewählt (siehe Beispiel »Ö« weiter 
unten). 

In meiner Erweiterung gibt es den Befehl COPY: Er ko¬ 
piert den Zeichensatz ins RAM, wo er dann mittels CREATE 
und CODE (siehe unten) verändert werden kann. Mit CRE¬ 
ATE wird das zu verändernde Zeichen festgelegt. Wir wol¬ 
len zum Beispiel aus dem O einen Umlaut Ö machen. So 
schreiben wir folgendes: CREATE 1,15. 

Die 1 bewirkt, daß wir ein Zeichen (0 wäre für Sprites) ver¬ 
ändern und die 15 ist der Bildschirm-Code für den Buchsta¬ 
ben O. Der Befehl CODE bestimmt nun das Bitmuster für 
das mit CREATE ausgewählte Zeichen. Unser Ö würde nun 
im Programm so aussehen: 
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Alle neuen Befehle auf einen Blick 

RESET Neustart der Erweiterung; bereits vorhandene Basic- 

xe = doppelte Breite (0=nein, 1=ja) 

Programme werden nicht gelöscht. 

pr = Priorität vor (=0) oder hinter (=1) Bildschirmzeichen 

HELP Auflistung aller Befehle von Game-Basic. 

mc = Multicolor an (=1) oder aus (=0) 

BASIC Abschalten der Erweiterung; auch hier werden Programme 

f = Farbe des Sprites 

nicht gelöscht. 

SSET s,x,y Setzt Sprite Nummer s an Position x (0-5111), y (0-255). 

COLOR rf,hf,zf Rahmen- (rf), Hintergrund- (hf) und Zeichenfarbe 
(zf) setzen. 

SRUN s,ri Sprite s bewegt sich in angegebene Richtung: 

REVERS Invertiert den gesamten Bildschirminhalt. 

PAINT f Färbt Bildshcirminhalt mit Farbe f. 

0 7 6 5 4 3 2 t 

CLS Bildschirm löschen. 

SSTOP s Sprite s hält wieder an. 

SCROFF Bildschirm ausschalten. 

MULTI C,z1,z2,s1,s2 Multicolor-Mode ein- und ausschalten: 

SCRON Bildschirm wieder einschalten. 

c = 0 = Multicolor für Zeichen an 

CLEAR an.en Bildschirm wird von Zeile an bis Zeile en gelöscht. 

1 = Multicolor für Zeichen aus 

COPY Zeichensatz ins RAM kopieren. 

2 = Angabe von Zusatzfarben 

TAB Formatierten LIST-Modus ein- beziehungsweise ausschalten. 

Bei Verwendung von 0 oder 1 brauchen die Zusatzfarben nicht 

PAUSE t Das Programm wird t*0,002 Sekunden lang angehalten. 

mit angegeben werden. 

INC ad,eh Addiert eh zum Inhalt der Adresse ad. 

zl = Zusatzfarbe 1 für Zeichen 

DEC ad,eh Subtrahiert eh vom Inhalt der Adresse ad. 

z2 = Zusatzfarbe 2 für Zeichen 

SET s,z,f,”text” Schreibt »text« in die Zeile z, Spalte s mit der 

sl = Zusatzfarbe 1 für Sprites 

Farbe f. 

s2 = Zusatzfarbe 2 für Sprites 

SCROLL az,ez,s,z,f,r Scrollt Bildschirmbereich von Anfangszeile 

CREATE m,b1 Erstellen eines neuen Zeichens/Sprites: 

az bis Endzeile ez in Richtung r (0=nach rechts, 1=nach links). Da- 

m = Mode (0=Sprlte, 1=Zeichen) 

bei werden Zeichen mit dem Code z in der Farbe f nachgescrollt. 

bl = Spriteblock oder Zeichencode 

SON s Schaltet Sprite Nummer s ein. 

CODE bits Nur in Zusammenhang mit dem CREATE-Befehl. 

SOFF s Schaltet Sprite Nummer s aus. 

Bei Sprites 24 Bits, bei Zeichen 8 Bits. 

SPRITE s,bl,ye,xe,pr,mc,f 

.= Hintergrundfarbe. 

Bestimmt Sprite Nummer s: 

1 = Farbe des Zeichens/Sprites (bei Multicolor-Mode Zusatzfarbe 1) 

bl = Block (32-64) 

2 = Zusatzfarbe 2 

ye = doppelte Höhe (0=nein, 1=ja) 

3 = Farbe des Zeichens/Sprites bei Multicolor-Mode 


Tabelle 1. Die vielfältigen Befehle von Game-Basic zusammen mit den benötigten Parametern auf einen Blick 


10 

CREATE 

1 ,15 

oder 10 

CREATE 1,15 

20 

CODE 

.11 . .11. 

20 

CODE . 11 . . Ti. 

30 

CODE 


30 

CODE ..1111.. 

40 

CODE 

. .1111 .. 

40 

CODE . 

50 

CODE 

.11 . .11. 

50 

FORI = 1T04 

60 

CODE 

.11. .11. 

60 

CODE .11.. 11. 

70 

CODE 

.11. .11. 

70 

NEXT 1 

80 

CODE 

.11 . .11. 

80 

CODE ..1111.. 

90 

CODE 

. .1111 .. 



Es 

würde auch schon 

folgendes genügen, da die restli 

chen 

Bitmuster mit dem 

O übereinstimmen: 

10 

CREATE 

1 ,15 



20 

CODE 

.11 . .11. 



30 

CODE 




40 

CODE 

. .1111 .. 




Der Zeichensatz kann natürlich auch durch die altbe¬ 
währte r OKE-Methode verändert werden, da er jetzt »mit¬ 
ten« im RAM-Bereich liegt (ab $2000 dez. 8192). 

Auch der Multicolor-Modus wird in meiner Erweiterung 
sowohl für Zeichen als auch für Sprites voll unterstützt: 

Aktiviert wird dieser mit dem Befehl MULT11 beziehungs¬ 
weise ausgeschaltet mit MULTI 0. Die Multicolor-Zusatz- 
farben (zwei an der Zahl) bestimmt man ebenfalls mit 
MULTI. 

»MULTI 2, 5, 2, 6, 7« bedeutet zum Beispiel, daß ab jetzt 
Zeichen in den Farben Grün (5) und Rot (2), Sprites in den 
Farben Blau (6) und Gelb (7) dargestellt werden. MULTI 2,... 
bedeutet: Multicolor-Modus mit den folgenden Farben ein¬ 
schalten. Bei den Bitmustern ändern sich jetzt allerdings 
die Codes: 
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1 = Zusatzfarbe 1,2 = Zusatzfarbe 2,3 = normale Zusatz¬ 
farbe, . = leer 

Die bunte Version unseres Ö sähe nun so aus: 

CODE . .11. .11 

CODE . . 11 . . 11 entspricht grün 

CODE. 

CODE . .222222 
CODE . .22..22 

CODE . . 22. .22 entspricht rot 

CODE . .33..33 

CODE . . 333333 entspricht aktueller Zeichenfarbe 

Es ist darauf zu achten, daß die Zahlen der CODEs im¬ 
mer paarweise angegeben werden (Multicolor). Bei der Er¬ 
stellung von Sprites wird genauso vorgegangen, bis auf fol¬ 
gende Änderungen: 

1) »CREME 0, Spriteblock (32-63)«. Statt dem Zeichensatz 
wird der gewählte Block angegeben (32-63). Die 0 teilt dem 
Computer mit, daß ein Sprite und kein Zeichen verändert 
beziehungsweise erstellt werden soll. 

2) Das Bitmuster beim CODE-Befehl hat jetzt 24 Stellen an¬ 
statt acht bei Zeichen. 

Der Befehl SET ist ein erweiterter PRINT-Befehl. Der Un¬ 
terschied zum PRINT-Befehl liegt darin, daß die Steuerzei¬ 
chen entfallen (wie anfangs erwähnt). 

Zum Beispiel SET 18,12,1,"TEXT” 

Dieser Befehl schreibt das Wort TEXT in die zwölfte Zeile 
ab der 18. Spalte in weißen Zeichen. Mit dem normalen 
PRINT-Befehl würde man dazu eine Unmenge Steuerzei¬ 
chen benötigen; außerdem ist der SET-Befehl schneller. 


Bildschirmverwaltung 


Der Befehl SCROLL verschiebt beziehungsweise verän¬ 
dert beliebige Bildschirmbereiche. Eine genauere Erklä¬ 
rung möchte ich an dieser Stelle fallenlassen, da man die 
Möglichkeiten durch eigene Versuche am besten sehen 
kann. 

Die restlichen sechs der insgesamt 26 Befehle meiner 
Erweiterung unterstützen ausschließlich den Umgang mit 
Sprites. Mit SON wird ein Sprite ein- beziehungsweise mit 
SOFF wieder ausgeschaltet. 

SSET positioniert ein Sprite an eine beliebige Stelle im 
(oder außerhalb) des Bildschirms. Das achte Bit im VIC- 


Register 16 für die Sprite X-Position braucht dabei nicht be¬ 
achtet zu werden. Mit SPRITE wird ein Sprite definiert. Fol¬ 
gende Parameter werden hier angegeben: 

Spritenummer, Block (Aussehen des Sprites — 32-63), 
Y-Expanded (ja oder nein), X-Expanded (ja oder nein), vor 
oder hinter Bildschirmzeichen, Multicolor (ja oder nein), 
Grundfarbe. 

Ein ganz spezieller Befehl ist SRUN. Mit SRUN kann ein 
beliebiges Sprite (oder auch mehrere) in eine von acht 
möglichen Richtungen bewegt werden. Das Programm 
wird dadurch aber nicht aufgehalten, da die Sprites vom In¬ 
terrupt gesteuert werden. Dadurch ist es zum Beispiel mög¬ 
lich, daß ein Sprite, während es bewegt wird, seine Gestalt 
verändern oder sogar das Programm gelistet werden kann. 
Man kann sich so zum Beispiel ein Sprite in Bewegung an- 
sehen, während man es editiert. Aber auch hier sind natür¬ 
lich eigenen Versuchen keine Grenzen gesetzt. Der letzte 
Befehl SSTOP ist der Gegensatz zu SRUN, das heißt er 
stoppt die mit SRUN gestarteten Sprites. Die Positionen der 
Sprites können wie bisher mit dem normalen PEEK ausge¬ 
lesen werden. 


Die Speicherbelegung 

Alle wichtigen Adressen (Bildschirm, Farbspeicher, 
Sprites, SID, Timer etc.) bleiben unverändert. Der Be¬ 
reich $0800-$0FFF ist für 32 Sprites reserviert, die dort 
abgelegt werden. Die Erweiterung selbst liegt im Be¬ 
reich $1000-$17B0. Der Bereich $17B1-$1FFF bleibt frei 
und kann für eigene Maschinenprogramme genutzt 
werden. Ab der Adresse $2000 bis $27FF liegt ein frei 
definierbarer Zeichensatz. Ab $2800 beginnt der Basic- 
Spoi-'her (!). Dieser dehnt sich wie gewohnt bis zur 
Adresse $9FFF. Das RAM im Bereich $A000-$CFFF und 
von $E000-$FFFF bleibt frei und kann für eigene Zwecke 
verwendet werden. 


Eine Befehlsübersicht gibt Tabelle 1. Das Beispielpro¬ 
gramm (Listing 2) zeigt, wie man innerhalb von Spielen die¬ 
se neuen Befehle einsetzt. Bitte zur Eingabe von Listing 2 
nicht den Checksummer verwenden, da dieser nicht mit 
Basic-Erweiterungen zusammenarbeitet. 

(Ronald Mayer/sk) 
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Listing 1. »gamebasic-COOO«. 
Bitte mit dem MSE (Seite 158) 
eingeben. 
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Listing 1. »gamebasic-COOO«. (Schluß) 


10 REM********************* 

20 REM* GAME-BASIC DEMO * 

30 REM«-* 

50 REM* RONALD MAYER * 

60 REM* THENING 24 * 

70 REM* A—4062 THENING * 

80 REM* AUSTRIA * 

90 REM********************* 

95 A*-"* GAME-BASIC DEMOPROGRAMM **** 

9 1985 BY MR-SOPT RONALD MAYER ***" 

100 CQL0R9,13,6*CLSsCOPY 

110 SET15,11,6,"GAMEBASIC"sSET16,13,2,“D 
E M O" 

120 FORI-0TO24 * SCROLL0,24,0,32,15,0s SCRO 
LL0,24,0,32,15,1 *NEXTaPAUSE500 

125 FORI"lTO10sREVERSaPAUSE100:NEXT 

126 SCROLL0,10,39,160,9,1 

127 SCROLL14,24,39,160,9,0a PAUSE500 

128 FORI-1TO40* SCROLL11,13,0,160,12,1 * PA 
USE40BNEXT 

130 FORI-0TO39 s SCROLL0,24,0,160,1,01NEXT 
140 FORI-0TO24 a SCROLLI,24,1,160,1,1 * NEXT 
IPAINT11 

150 CREATE1,160:FORI-1TOB 

160 CODE.PAUSE200: NEXT 

161 CREATE1,160: F0RI=*1T08 

162 CODE11111111:PAUSE200:NEXTI 
170 SCROLL0,24,19,160,15,0 

180 COLOR9,0,6 

190 SCROLL0,24,19,32,0,1 

200 CREATE0,32 

210 CODE.333333. 

220 CODE_3333333333. 

230 CODE..33333333333333. 

240 CODE..33 3333 33333333. 

260 C0DE33333333..33333333. 

270 C0DE333333. 331111111111 

280 C0DE333333.1111111111 


290 C0DE333333.11111111,. 

300 CODE333333.111111.... 

310 C0DE333333. 

320 CODE333333.222222.... 

330 C0DE333333. 22222222.. 

340 CODE333333. 2222222222 

350 C0DE333333. 332222222222 

360 C0DE33333333..33333333. 

370 C0DE333333333333333333. 

380 CODE..33333333333333. 

390 CODE..2 

400 CODE....3333333333. 

410 CODE.333333. 

420 SST0P8:S0FF8*MULTI2,0,0,10,6*FORI»0T 
07:SSETI,40*1,138-1 * NEXT 

430 FORI-7TO0STEP-1iSPRITEI,32,0,0,1,1,1 
*1:SONI:PAUSE300a NE X T 
440 F0RJ-1T02 

450 FORI B 0TO7* SRUNI,1sPAUSE80:NEXT 
460 FORI-0TO7*SRUNI,5:PAUSEB0:NEXT 

465 FORI-0TO7aSRUNI,3aPAUSEB0:NEXT 

466 FORI-0TO7a BRUN1,7* PAUSEB0:NEXTI,J 

470 FORI-0TO7:SOFFIa SSTOPI:PAUSE100 a NEX T 
I 

480 SCR0LL5,19,39,45,15,1 

490 FORI=0TO7:SSETI,172,139:NEXT 

500 SCROLL10,14,39,64,14,1 

501 SCROLL0,4,9,32,0,0 

502 SCROLL20,24,9,32,0,0 

510 S0N8:FORI=0TO7:SRUNI,IxNEXT:PAUSE200 


520 CREATE0,32 

521 CODE.333333333333. 

522 CODE....3333333333333333_ 

523 CODE-3333333333333333_ 

524 CODE..333333.333333.. 

525 CODE..333333. 333333.. 

526 CODE..3333..22222222..3333..:PAUSE50 


527 CODE333333..22222222..333333 

528 C0DE3333..112222222222.. 3333 

529 C0DE3333..111122222222..3333 

530 C0DE3333..111122222222..3333 

531 C0DE3333..111111222222..3333 

532 C0DE3333..111111112222..3333 

533 C0DE3333..111111112222..3333 

534 C0DE3333..111111111122..3333 

535 C0DE333333..11111111..333333* PAUSE50 
0 


aoa luuc. . jjw. .liiiiaii.. jooj. . 

537 CODE..333333. 333333.. 

538 CODE. . 333333. 333333. . 


539 CODE-3333333333333333_ 

540 CODE....3333333333333333- 

541 CODE.333333333333. 

550 CREATE1,0 

560 CODE..1111.. 

570 CODE.1....1. 

580 CODE1..11..1 
590 CODE1.1....1 
600 CODE1.1....1 
610 C0DE1..11..1 
620 CODE.1.... 1. 

630 CODE..1111.. 

640 FORI-lTO2*FORJ-lTO69aPAUSE40 

649 B*«MID*<A*,J,1> 

650 SCR0LL12,12,0,ASC(B$>ANDN0T64,15,0:N 
EXTJ,I:PAUSE1000 

660 FORI=0TO39:SCROLL0,24,0,77+RND(1>*2, 
9,1:NEXT:PAUSE3000:GOTO126 

READY. 


Listing 2. Beispielprogramm zu 
Game-Basic. Bitte nicht mit dem 
Checksummer eingeben. 
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LISTINGS 


ProDisc - eine professionelle 
Diskettenverwaltung 


Diese sehr komfortabel zu bedienende Disketten¬ 
verwaltung gibt Ihnen die Möglichkeit, bis zu 1745 
Programme auf optimalste Weise zu erfassen. 

K eine Diskettenverwaltung wie die üblichen, sondern 
eine, die aus dem Rahmen fällt, »ProDisc«. Sie verei¬ 
nigt die folgenden Extras unter einer komfortablen 
Benutzeroberfläche: 

- Keine lästige Eingabe von Befehlen oder Auswahl aus un¬ 
übersichtlichen Menü-Monstern mehr. Es wird einfach aus 
einer Leiste von ansprechenden Bildsymbolen die ge¬ 
wünschte Funktion herausgepickt; 

- Kapazität von über 500 Diskettenseiten oder 1745 Pro¬ 
grammnamen; 

-Sortieralgorithmus nach verschiedenen Auswahlkrite¬ 
rien: Alphabet, ID und Seite; 

- Unterschiedliche Delete-Modi: In- und Exclude; 

- Mehrfacheditierung; 

- Druckroutine für verschiedene Drucker anpaßbar; 

- Gute Übersichtlichkeit durch Window-Technik; 

- Sehr schnelle Suchroutinen, um bestimmte Programm¬ 
namen herauszufinden; 

- Automatisches Einsortieren aufzunehmender Titel in die 
Hauptdatei; 

- Das Programm liegt komplett im Bereich ab $A000 auf¬ 
wärts, so daß kein Basicspeicher »verbraten« werden muß. 

Außerdem besteht noch die Möglichkeit, während des 
Einlesevorganges den Namen und die ID der eingelegten 
Diskette zu verändern. 

Die Aufnahme der Disketten erfolgt auf denkbar einfach¬ 
ste Weise: Man muß nur eine Diskette in die Floppy einle- 
gen, auf eine Taste drücken, und das ganze Directory wird 
in den Speicher gelesen. Nach sehr kurzer Zeit erscheint 
ein Fenster, das sich selbst erklärt (Name/ID der Diskette 
ändern). Ist diese erste Aufnahme-Phase abgeschlossen, 
stellt das Programm die eingelesenen Programmtitel in di¬ 
versen Windows dar, von wo aus sie nun durch Druck der 
Return-Taste übernommen oder editiert werden können. 

Auch die anderen Unterpunkte sind gleichermaßen ein¬ 
fach und effektiv zu benutzen. 

Bedienung von ProDisc 


Dies beruht zum Großteil auf der komfortablen Benutzer¬ 
oberfläche. Sie müssen keine umständlichen Befehle mehr 
eingeben, sondern nur noch auf ein »Icon« (Bildsymbol) 
deuten, das daraufhin die betreffende Funktion ausführt. 
Ganz zu schweigen von der Datenmenge, die sich damit er¬ 
fassen läßt (1745 Programmtitel auf einmal im Speicher, da 
sich das Hauptprogramm in von Basic aus nicht erreichba¬ 
ren Speicherbereichen befindet). Weitere Pluspunkte: Sor¬ 
tieralgorithmus nach diversen Kriterien, unterschiedliche 
Delete-Modi, Mehrfacheditierung, Druckerroutine anpaß¬ 
bar und gute Übersichtlichkeit durch Window-Technik. Al¬ 
les in allem ein sehr brauchbares Werkzeug für all jene, die 
sich bei ihren Disketten nicht mehr zurechtfinden. 

Das Programm 

Nachdem Sie das Ladeprogramm gestartet haben, wer¬ 
den die noch fehlenden Routinen eingelesen und anschlie¬ 
ßend das Programm aktiviert. Es erscheint das immer zu 


sehende Hauptmenü mit der am rechten Rand befindli¬ 
chen Symbol-Leiste. Des weiteren ist am oberen Bild¬ 
schirmrand noch ein Statusfeld zu sehen, auf das später 
noch eingegangen wird, sowie ein blinkender Auswahl- 
Pfeil. 

Die Symbol-Leiste 

Die rechts befindlichen Bildsymbole, die mit den Cursor¬ 
tasten angewählt und durch Drücken von < RETURN > ak¬ 
tiviert werden, haben folgende Bedeutung (von oben nach 
unten): 

- Icon 1 (Diskettenzugriff): Hier können Sie Datensätze 
laden, speichern und mit dem Speicherinhalt vergleichen 
(verifizieren). Die Datei wird automatisch unter dem Namen 



Bild 1. Die Benutzeroberfläche mit Windows 


»CCT-DATA-FI« gespeichert (ein bestehender Eintrag wird 
überschrieben). Fehler im Bus-Betrieb, an den Benutzer 
gerichtete Aufforderungen oder Anfragen zeigt das Pro¬ 
gramm automatisch in der Kommentarzeile (.) im Sta¬ 

tusfeld an. Rückkehr in das Hauptmenü mit < - >«. 

- Icon 2 (Löschen): Das Löschen erfolgt über drei Kriterien 
(Alphabet, ID und Seite). Dabei ist der Einsatz des Zei¬ 
chens »£« als Joker möglich. 

Um zum Beispiel alle Programmnamen zu löschen, die 
mit »Sl...« beginnen, gibt man nach Drücken der Alphabet- 
Taste (1) folgendes ein: »SIE«, gefolgt von < RETURN>. 
Dies ist der INCLUDE-Modus. 

Zusätzlich können Sie auch den EXCLUDE-Modus wäh¬ 
len (siehe Icon 7). Nun würden alle Programme außer 
»Sl...« gelöscht. 

- Icon 3 (Listen der Datei): Es gelten dieselben Kriterien 
wie im Delete-Modus (Icon 2). Um die gesamte Datei zu li¬ 
sten, drückt man einfach die Alphabet-Taste, gefolgt von 
< RETURN >. Durch Drücken von < SPACE> wird der 
nächste Programm-Name gelistet. 

Soll ein Name verändert werden, so gibt man statt 
<SPACE> einfach <E> wie Editieren ein. Nun können 
Sie sämtliche Angaben ändern. Die Windows können je¬ 
derzeit mit der < — >-Taste verlassen werden. 

- Icon 4 (Diskette aufnehmen): Von der eingelegten Dis¬ 
kette werden zuerst Name und ID gelesen und angezeigt. 
Diese Daten sind durch Drücken von < RETURN > editier- 
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bar. Die geänderten Daten schreibt das Programm an¬ 
schließend auf die Diskette zurück und liest die neuen Da¬ 
ten nochmal ein. 

Wollen Sie den Header nicht ändern, so fragt Sie das 
Programm nach Eingabe von < N > (Nein) nach der Disket¬ 
tenseite. Hier geben Sie bitte <A> für die Vorderseite und 
<B> für die Rückseite ein. 

Nach der Seitenwahl werden nun die Programmtitel geli¬ 
stet. Durch die Cursor-Tasten lassen sich die Einträge sei¬ 
tenweise bis zum Ende des Directories listen. Mit 
<CLR/HOME> gelangt man wieder zum Anfang des ak¬ 
tuellen Windows. Durch < RETURN > wird der Eintrag auf¬ 
genommen (auf schon bestehende Einträge weist die Kom¬ 
mentarzeile hin). 

In der Statuszeile lassen sich nun ID, die Seite, die Zahl 
der auf der Diskette enthaltenen Einträge und die Anzahl 
der noch freien Einträge ablesen. Auch hier besteht die 
Möglichkeit, mit der <E>-Taste die Programm-Namen 
noch vor dem Aufnehmen zu editieren. 

- Icon 5 (Sortieren): Zur Auswahl stehen drei Sortier- 
Kriterien: Alphabet, ID und Diskettenseiten (Wartezeiten 
sind nicht auszuschließen). Zusätzlich ist es möglich, über 
Autosort (siehe Icon 7) die Einträge automatisch nach Auf¬ 
nahme alphabetisch sortieren zu lassen. 

- Icon 6 (Drucken): Es wird die komplette Datei im aktuel¬ 
len Zustand ausgedruckt (siehe auch Icon 7). 

- Icon 7 (Ende): Verlassen des ProDisc-Systems oder Än¬ 
dern der Parameter. Durch Drücken der Anfangsbuchsta¬ 
ben der Optionen werden die jeweiligen Flags gesetzt oder 


gelöscht (ausgefüllte Kreisfläche bedeutet gesetzt (•), 
Kringel gelöscht (o). 

- CBMZ.SATZ: Ausdruck mit dem CBM-Zeichensatz für 
CBM-Drucker (•) oder normalem Zeichensatz (o) für 
Fremddrucker (Epson, ...). 

- EZ-BLATT: Das Programm wartet entweder bei jedem fer¬ 
tigen Blatt, bis ein neues eingelegt wird (•) oder druckt oh¬ 
ne Unterbrechung (O). 

- INCLUDE: Löschen nach bestimmten Kriterien (siehe 
Icon 2), normalerweise Include (•). 

- AUTOSORT: Ist diese Funktion aktiv (•), so sortiert das 
Programm neue Einträge gleich nach der Übernahme ein. 
Allgemein gilt: Alle Unterprogramme können jederzeit 
durch Druck der < — >-Taste verlassen werden. 
Eingabehinweise 

Bitte geben Sie die Listings 1 bis 8 jeweils mit dem MSE 
(Seite 158) ein und speichern Sie sie auf Diskette. 

Zum Starten laden Sie bitte das Ladeprogramm »Pro- 
Disc« (Listing 1) und aktivieren es mit RUN. Anschließend 
werden die anderen Files nachgeladen und automatisch 
gestartet. Noch etwas: Bitte drücken Sie während des Be¬ 
triebs nicht die Restore-Taste, das Programm könnte ab- 
stürzen. Falls dies doch passieren sollte, finden Sie als Li¬ 
sting 8 das Programm »Proretter«, mit dem Sie den Scha¬ 
den beheben können. Laden Sie das Programm mit 
LOAD "PRORETTER",8,1 

und Sie befinden Sie auch nach einem Reset wieder im 
Hauptmenü von ProDisc, wo Sie nun Weiterarbeiten kön¬ 
nen. (Frank Müller/sk) 
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0999 

dO 
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a9 
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20 
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ff 

d7 

0b41 : 

ff 

ff 

7f 

ff 

ff 

40 

00 

03 
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09al 

a9 
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20 
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ff 
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04 
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ff 
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40 
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ff 
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0801 

Ob 

08 

cl 

07 

9e 

32 

30 

36 

Oa 

09a9 

d2 

ff 

a9 

12 

20 

d2 « 

a9 

13 

0b51 : 

f 3 

48 

38 

13 

4f 

83 

f 3 

4d 

54 

0809 

31 

00 

00 

00 

a9 

2c 

aO 

08 

c9 

09bl 

lf 

20 

d2 

ff 

60 

20 

83 

al 

ed 

0b59 : 

ff 

f 3 

40 

00 

03 

7f 

ff 

fe 

8c 

0811 

85 

5f 

84 

60 

a9 

82 

aO 

09 

b6 

09b9 

aO 

02 

bl 

fa 

c9 

20 

dO 

02 

Ob 

0b61 : 

00 

10 

00 

00 

38 

00 

00 

7c 

e6 

0819 

85 

5a 

84 

5b 

a9 

56 

aO 

92 

4d 

09cl 

a9 

2e 

20 

d2 

ff 

c8 

cO 

12 

51 

0b69 : 

00 

00 

38 

00 

00 

38 

00 

3e 

b6 

0821 

85 

58 

84 

59 

20 

bf 

a3 

4c 

46 

09c9 

dO 

fO 

20 

83 

al 

20 

d2 

al 

33 

0b71 : 

3e 

3e 

20 

20 

08 

26 

38 

08 

7d 

0829 

00 

91 

00 

a2 

08 

aO 

00 

ea 

a2 

09dl 

60 

a2 

00 

bd 

3a 

a2 

20 

d2 

19 

0b79 : 

22 

20 

08 

3e 

3e 

08 

00 

00 

99 

0831 

ea 

ea 

a2 

28 

aO 

92 

a9 

06 

8f 

09d9 

ff 

e8 

eO 

06 

dO 

f 5 

60 

20 

c4 

0b81 : 

06 

00 

00 

19 

80 

00 

62 

60 

fd 

0839 

ea 

ea 

ea 

a9 

00 

a2 

00 

aO 

de 

09el 

83 

al 

aO 

02 

bl 

fa 

20 

d2 

b6 

0b89 : 

01 

8c 

98 

06 

63 

60 

19 

19 

87 

0841 

aO 

4c 

5f 

08 

a5 

01 

29 

fe 

e5 

09e9 

ff 

c8 

cO 

10 

dO 

fG 

20 

83 

cb 

0b91 : 

eO 

06 

87 

98 

07 

9e 

60 

19 

82 

0849 

85 

01 

a9 

05 

8d 

00 

dd 

a9 

fd 

09f 1 

al 

aO 

10 

bl 

fa 

20 

d2 

ff 

19 
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06 
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07 

9e 

60 

6e 
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08 

8d 
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dO 
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d8 

8d 

16 

04 
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c8 

cO 

18 

dO 

f 6 

20 

d2 

al 

40 
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19 

f9 

80 

06 

66 

00 

01 

98 

33 

0859 

dO 

a9 

3b 

8d 

ii 

dO 

a9 

6c 

95 
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60 

a4 

ff 

bl 

fc 

c8 

c9 

20 

67 
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00 
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00 
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a9 
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Obel : 

00 
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ff 

e8 

eO 

e3 
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02 

74 

80 
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00 

40 

00 

9b 

7f 

0881 

a9 

93 

20 

d2 

ff 

4c 

8b 

08 

f 7 

0a29 

10 

dO 
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20 

8e 

al 

20 

9c 

d2 
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20 

00 

80 

20 

01 

3c 

40 

06 

14 
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ea 
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20 

18 
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07 
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d6 

0a31 

al 

60 

22 

14 

9a 

94 

94 

20 

ee 
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01 

80 

09 
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00 

08 

03 

ff 

07 
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00 

dd 
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ef 

8d 

11 

dO 

a2 

d2 

0a39 

20 

94 

94 

20 

20 

9d 

9d 

ff 

32 
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04 
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07 

lb 

ff 

9f 

60 

00 

86 

0899 

08 

aO 

00 

ea 

ea 

ea 

a2 

2e 

3c 

0a41 

ff 

cO 

ff 

ff 

cO 

ff 

ff 

cO 

2e 

Obe9 : 

7f 

ff 

ff 

ff 

80 

00 

fe 

bl 

cf 
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aO 

92 

a9 

06 

ea 

ea 

ea 

a9 

ba 

0a49 

ff 

ff 

cO 

ff 

ff 

cO 

ff 

ff 

7e 

Obf 1 : 

fc 

f 8 

80 

00 

eO 

ff 

ff 

80 

98 

08a9 

00 

a2 

00 

aO 

aO 

ea 

ea 

ea 

n 

Oabl 

cO 

ff 

ff 

cO 

ff 

ff 

cO 

ff 

2c 

Obf9 : 

00 

00 

00 

00 

00 

00 

00 

00 

fa 

08bl 

a2 

08 

aO 

00 

20 

ba 

ff 

a2 

9d 

0a59 

ff 

cO 

ff 

ff 

eO 

ff 

ff 

cO 

46 

OcOl : 

00 

00 

3e 

3e 

3e 

a2 

a2 

a2 

21 

08b9 

34 

aO 

92 

a9 

06 

20 

bd 

ff 

6f 

0a61 

ff 

ff 

cO 

00 

00 

00 

00 

00 

90 

0c09 : 

3e 

22 

22 

3e 

22 

22 

a2 

a2 

ac 

08cl 

a9 

00 

a2 

cO 

aO 

a4 

20 

d5 

86 

0a69 

00 

00 

00 

00 

00 

00 

00 

00 

6a 

Ocll : 

a2 

22 

22 

22 

22 

22 

3e 

a2 

03 

08c9 

ff 

a2 

08 

aO 

00 

20 

ba 

ff 

lb 

0a71 

00 

00 

00 

00 

00 

00 

00 

00 

72 

0cl9 : 

a2 

be 

22 

22 

22 

22 

22 

22 

e7 

08dl 

a2 

3a 

aO 

92 

a9 

06 

20 

bd 

dl 

0a79 

00 

00 

00 

00 

00 

00 

00 

00 

7a 

0c21 : 

a2 

a2 

a2 

22 

22 

22 

22 

22 

01 

08d9 

ff 

a9 

00 

a2 

50 

aO 

a8 

20 

ee 

0a81 

00 

00 

3f 

ff 

f 8 

3f 

ff 

f 8 

cd 

0c29 : 

22 

a2 

be 

a2 

22 

3e 

22 

22 

81 

08el 

d5 

ff 

a2 

08 

aO 

00 

20 

ba 

5f 

0a89 

3f 

ff 

f 8 

3f 

ff 

eO 

3f 

ff 

f 2 

0c31 : 

22 

22 

a2 

a2 

a2 

3e 

3e 

3e 

f 3 

08e9 

ff 

a2 

40 

aO 

92 

a9 

05 

20 

28 

0a91 

eO 

3f 

ff 

fB 

3f 

c7 

fB 

3f 

c:4 

0c39 : 

00 

00 

00 

00 

00 

00 

00 

00 

3a 

08f 1 

bd 

ff 

a9 

00 

a2 

00 

aO 

eO 

87 

Oa99 

83 

f8 

3f 

83 

f 8 

3f 

83 

f 8 

62 

0c41 : 

00 

00 

00 

00 

00 

Of 

3c 

fO 

8d 

08f 9 

20 

d5 

ff 

a2 

08 

aO 

00 

20 

le 

Oaal 

3f 

c7 

f 8 

3f 

fc 

f 8 

3f 

c7 

Oe 

0c49 : 

06 

le 

60 

06 

lb 

60 

06 

19 

36 

0901 

ba 

ff 

a2 

45 

aO 

92 

a9 

05 

5b 

0aa9 

f 8 

3f 

c7 

f 8 

3f 

c7 

f 8 

3f 

e6 

0c51 : 

eO 

Of 

3c 

fO 

00 

00 

00 

00 

e6 

0909 

20 

bd 

ff 

a9 

00 

a2 

80 

aO 

95 

Oabl 

c7 

f 8 

3f 

ef 

f 8 

3f 

ff 

f8 

3e 

0c59 : 

00 

00 

c6 

le 

3f 

c6 

3f 

3f 

74 

0911 

ab 

20 

d5 

ff 

a2 

08 

aO 

00 

2f 

0ab9 

00 

00 

00 

00 

00 

00 

00 

00 

ba 

0c61 : 

c6 

63 

30 

c6 

61 

30 

c6 

3c 

e9 

0919 

20 

ba 

ff 

a2 

4a 

aO 

92 

a9 

32 

Oacl 

00 

00 

00 

7e 

00 

00 

42 

00 

9a 

0c69 : 

3c 

c6 

le 

3c 

c6 

43 

30 

ee 

3d 

0921 

05 

20 

bd 

ff 

a9 

00 

a2 

00 

cb 

Oac9 

lf 

ff 

fO 

20 

00 

08 

lf 

ff 

e5 

0c71 : 

63 

30 

f 6 

7e 

3f 

66 

3c 

3f 

10 

0929 

aO 

a8 

20 

d5 

ff 

a2 

08 

aO 

57 

Oadl 

fO 

04 

00 

40 

05 

99 

cO 

05 

f 6 

0c79 : 

00 

00 

00 

00 

00 

00 

00 

ce 

17 

0931 

00 

20 

ba 

ff 

a2 

4f 

aO 

92 

3c 

0ad9 

99 

cO 

04 

88 

cO 

04 

88 

cO 

b4 

0c81 : 

a4 

9f 

10 

e7 

ee 

06 

9f 

a9 

e7 

0939 

a9 

05 

20 

bd 

ff 

a9 

00 

a2 

b7 

Oael 

04 

88 

cO 

04 

88 

cO 

04 

88 

8a 

0c89 : 

08 

cd 

06 

9f 

dO 

d4 

20 

93 

49 

0941 

00 

aO 

cO 

20 

d5 

ff 

a5 

01 

bb 

0ae9 

cO 

04 

88 

cO 

04 

88 

cO 

05 

77 

0c91 : 

61 

60 

ad 

a2 

9f 

8d 

a4 

9f 

la 

0949 

09 

01 

85 

01 

20 

18 

e5 

4c 

47 

Oafl 

99 

cO 

05 

99 

cO 

04 

00 

40 

Oc 

0c99 : 

ad 

ab 

9f 

8d 

73 

9f 

ac 

73 

83 

0951 

00 

cO 

00 

43 

43 

54 

48 

52 

b6 

Oaf 9 

07 

ff 

cO 

00 

00 

00 

00 

00 

30 

Ocal : 

9f 

20 

6f 

96 

ad 

29 

9f 

dO 

43 

0959 

47 

43 

43 

54 

53 

50 

52 

43 

25 

ObOl 

00 

00 

00 

03 

00 

00 

00 

cO 

e3 

0ca9 

07 

a5 

fe 

38 

e9 

14 

85 

fe 

9d 

0961 

43 

54 

4d 

31 

41 

43 

43 

54 

2c 

0b09 

f 8 

01 

30 

88 

23 

8c 

be 

7b 

27 

Ocbl : 

ad 

al 

9f 

8d 

a3 

9f 

ac 

aa 

08 

0969 

4d 

31 

42 

43 

43 

54 

4d 

32 

b8 

Obll 

83 

a2 

23 

8c 

af 

81 

30 

a8 

59 

0cb9 

9f 

a9 

fO 

ae 

29 

9f 

dö 

00 

12 

0971 

43 

43 

54 

4d 

33 

43 

43 

54 

18 

Obi 9 

80 

cO 

c8 

83 

00 

28 

80 

00 

e7 











0979 

4d 

34 

43 

43 

54 

4d 

35 

ff 

9e 

0b21 

38 

80 

00 

08 

80 

00 

Of 

80 

eO 
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0981 

0989 

ff 

14 

00 

20 

a9 

d2 

22 

ff 

20 

60 

d2 

a2 

ff 

00 

a9 

bd 

lb 

f8 

0b29 

0b31 

00 

49 

00 

09 

00 
f 3 

00 

c9 

93 

Of 

dd 
f 2 

e9 

49 

92 

09 

le 
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d2 
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07 

50 
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92 

49 
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00 

00 

00 

00 

3f 
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a4c0 a7cc 

a4c0 

a9 

93 

20 

d2 

ff 

a9 

Oe 

8d 

36 

a4c8 

20 

dO 

a9 

01 

8d 

21 

dO 

a2 

45 

a4d0 

00 

a9 

06 

9d 

00 

d8 

9d 

00 

17 

a4d8 

d9 

9d 

00 

da 

9d 

00 

db 

e8 

f 6 

a4e0 

eO 

ff 

dO 

ed 

a2 

00 

bd 

80 

d4 

a4e8 

ab 

20 

d2 

ff 

e8 

eO 

90 

dO 

dl 

a4f 0 

f 5 

a2 

07 

aO 

03 

a9 

40 

99 

be 

a4f 8 

14 

05 

88 

10 

f 8 

ad 

f 8 

a4 

dd 

a500 

18 

69 

78 

8d 

f 8 

a4 

ad 

f 9 

fc 

a508 

a4 

69 

00 

8d 

f 9 

a4 

ca 

eO 

c4 

a510 

00 

dO 

eO 

a9 

14 

Bd 

f 8 

a4 

cO 

a518 

a9 

05 

8d 

f 9 

a4 

a2 

14 

a9 

e9 

a520 

42 

8d 

c3 

04 

ad 

22 

a5 

18 

4d 

a528 

69 

28 

8d 

22 

a5 

ad 

23 

a5 

ed 

a530 

69 

00 

8d 

23 

a5 

ca 

eO 

00 

95 

a538 

dO 

e5 

a9 

6b 

8d 

13 

05 

8d 

73 

a540 

8b 

05 

8d 

03 

06 

8d 

7b 

06 

dB 

a548 

8d 

f 3 

06 

8d 

6b 

07 

8d 

e3 

ef 

a550 

07 

a9 

c3 

8d 

22 

a5 

a9 

04 

cc 

a558 

8d 

23 

a5 

a9 

06 

8d 

e7 

db 

39 

a560 

8d 

e6 

db 

a9 

ff 

8d 

15 

dO 

ef 

a568 

a9 

ff 

8d 

10 

dO 

a2 

00 

bd 

14 

a570 

10 

ac 

9d 

00 

dO 

e8 

eO 

10 

36 

a578 

dO 

f 5 

a2 

00 

8a 

18 

69 

20 

3b 

a580 

9d 

f 8 

07 

e8 

eO 

08 

dO 

f 4 

f 4 

a588 

a2 

07 

a9 

00 

9d 

27 

dO 

ca 

04 

a590 

«0 

ff 

dO 

f 6 

a9 

Od 

8d 

ff 

bc 

a598 

07 

a9 

07 

8d 

2e 

dO 

a9 

80 

f 8 

abaO 

8d 

ld 

dO 

8d 

17 

dO 

ea 

ea 

lb 

a5a8 

60 

aO 

00 

b9 

40 

a2 

99 

3d 

8a 

a5b0 

03 

c8 

cO 

40 

dO 

f 5 

60 

11 

bO 

a5b8 

ca 

18 

a5 

fa 

69 

40 

85 

fa 

fc 

a5c0 

a5 

fb 

69 

00 

85 

fb 

4c 

b4 

90 

a5c8 

a5 

aO 

00 

bl 

fa 

99 

3d 

03 

6b 

a5d0 

c8 

cO 

40 

dO 

f 6 

ee 

00 

a8 

5b 

a5d8 

ad 

00 

a8 

c9 

Oa 

dO 

05 

a9 

77 

a5e0 

00 

8d 

00 

a8 

aO 

dO 

a9 

00 

f 3 

a5e8 

ea 

69 

01 

c9 

ff 

dO 

f 9 

c8 

00 

a5f0 

cO 

00 

dO 

f 2 

60 

a9 

92 

20 

21 

a5f 8 

d2 

ff 

a9 

13 

20 

d2 

ff 

a9 

82 

a600 

11 

20 

d2 

ff 

20 

d2 

ff 

a9 

c2 

a608 

le 

20 

d2 

ff 

60 

20 

f 5 

a5 

13 

a610 

a2 

ld 

a9 

90 

20 

d2 

ff 

a9 

a9 

a618 

2e 

20 

d2 

ff 

a2 

lb 

20 

d2 

34 

a620 

ff 

ca 

dO 

fa 

60 

a9 

01 

a2 

b4 

a628 

08 

aO 

6f 

20 

ba 

ff 

a9 

00 

b2 

a630 

20 

bd 

ff 

20 

cO 

ff 

a9 

08 

f 5 

a638 

20 

bl 

ff 

a9 

6f 

20 

93 

ff 

ac 

a640 

aO 

00 

bl 

fa 

20 

a8 

ff 

c8 

85 

a648 

c4 

fc 

dO 

f 6 

a9 

08 

20 

ae 

56 

a650 

ff 

a9 

01 

20 

c3 

ff 

60 

86 

33 

a658 

fa 

20 

Od 

a6 

20 

f 5 

a5 

a6 

10 

a660 

fa 

20 

bc 

a7 

bd 

00 

eO 

85 

f9 

a668 

fa 

bd 

01 

eO 

85 

fb 

aO 

00 

58 

a670 

20 

bc 

a7 

bl 

fa 

c9 

ii 

fO 

32 

a678 

Oc 

48 

20 

c4 

a7 

68 

20 

d2 

2d 

a680 

ff 

c8 

4c 

70 

a6 

4c 

c4 

a7 

34 

a688 

a5 

90 

85 

fa 

a9 

00 

85 

90 

08 

a690 

a9 

01 

a2 

08 

aO 

6f 

20 

ba 

df 

a698 

ff 

a9 

00 

20 

bd 

ff 

20 

cO 

4e 

a6a0 

ff 

a9 

08 

20 

b4 

ff 

a9 

6f 

4b 

a6a8 

20 

96 

ff 

20 

Od 

a6 

20 

f 5 

8a 

a6b0 

a5 

20 

a5 

ff 

20 

d2 

ff 

24 

af 

a6b8 

90 

50 

f 6 

a9 

08 

20 

ab 

ff 

93 

a6c0 

a9 

01 

20 

c3 

ff 

60 

8e 

05 

b2 

a6e8 

a8 

8c 

06 

a8 

8d 

02 

a8 

ad 

34 

a6d0 

03 

a8 

85 

fa 

18 

69 

00 

85 

cO 

a6d8 

fc 

ad 

04 

a8 

85 

fb 

69 

d4 

48 


a6eO : 

85 

fd 

a2 

00 

aO 

00 

a9 

aO 

fe 

a6e8 : 

91 

fa 

ad 

02 

a8 

91 

fc 

c8 

3f 

a6f0 : 

cc 

05 

a8 

dO 

fl 

a5 

fa 

18 

eb 

a6f8 : 

69 

28 

85 

fa 

a5 

fb 

69 

00 

16 

a700 : 

85 

fb 

a5 

fc 

18 

69 

28 

85 

04 

a708 : 

fc 

a5 

fd 

69 

00 

85 

fd 

e8 

79 

a710 : 

ec 

06 

a8 

dO 

cf 

60 

86 

fc 

58 

a718 : 

84 

fd 

aa 

86 

fa 

a5 

d6 

48 

df 

a720 : 

a5 

d3 

48 

a9 

92 

20 

d2 

ff 

6c 

a728 : 

a9 

20 

20 

d2 

ff 

ca 

aO 

00 

le 

a730 : 

dO 

f 8 

a9 

lf 

20 

d2 

ff 

68 

34 

a738 : 

85 

d3 

68 

85 

d6 

20 

6c 

e5 

5d 

a740 : 

a9 

00 

85 

fb 

20 

e4 

ff 

fO 

d5 

a748 : 

fb 

c9 

14 

10 

lb 

c9 

Od 

fO 

61 

a750 : 

32 

c9 

20 

30 

ef 

c9 

5f 

10 

60 

a758 : 

eb 

20 

d2 

ff 

a4 

fb 

91 

fc 

72 

a760 : 

c8 

84 

fb 

c4 

fa 

dO 

dd 

60 

70 

a768 : 

a6 

fb 

eO 

00 

fO 

d6 

ca 

86 

42 

a770 : 

fb 

a9 

9d 

20 

d2 

ff 

a9 

20 

bf 

a778 : 

20 

d2 

ff 

a9 

9d 

20 

d2 

ff 

6c 

a780 : 

4c 

44 

a7 

a4 

fb 

a9 

20 

91 

ld 

a788 : 

fc 

c8 

c4 

fa 

dO 

f 7 

60 

86 

d4 

a790 : 

d3 

84 

dfi 

4c 

6c 

e5 

85 

fa 

e6 

a798 : 

84 

fb 

aO 

00 

a9 

00 

91 

fa 

19 

a7aO : 

c8 

cO 

00 

dO 

f 9 

e6 

fb 

ca 

3f 

a7a8 : 

eO 

00 

dO 

ee 

60 

ae 

Ob 

a8 

93 

a7b0 : 

ac 

Oc 

a8 

20 

8f 

a7 

20 

50 

e8 

a7b8 : 

a8 

4c 

9f 

a8 

78 

a5 

01 

29 

8e 

a7c0 : 

fd 

85 

01 

60 

a5 

01 

09 

02 

57 

a7c8 : 

85 

01 

58 

60 

00 

ff 

00 

ff 

fO 

Listing 2: 

»CCTM1A«- 

Routinen 1 


Name : cctmlb a850 ab6b 


a850 

ad 

02 

a8 

dO 

05 

a9 

90 

4c 

bb 

a858 

96 

a8 

c9 

02 

dO 

05 

a9 

lc 

09 

a860 

4c 

96 

a8 

c9 

03 

dO 

05 

a9 

79 

a868 

9f 

4c 

96 

a8 

c9 

04 

dO 

05 

f 2 

a870 

a9 

9c 

4c 

96 

a8 

c9 

05 

dO 

de 

a878 

05 

a9 

le 

4c 

96 

a8 

c9 

06 

45 

a880 

dO 

05 

a9 

lf 

4c 

96 

a8 

c9 

dl 

a888 

07 

dO 

05 

a9 

9e 

4c 

96 

a8 

66 

a890 

c9 

08 

dO 

02 

a9 

81 

20 

d2 

9e 

a898 

ff 

a9 

12 

20 

d2 

ff 

60 

a9 

f 6 

a8a0 

00 

8d 

Oe 

a8 

ad 

Of 

a8 

85 

00 

a8a8 

fa 

ad 

10 a8 85 io 

20 

eO 

Oc 

a8b0 

al 

ea 

ea 

ea 

ea 

ea 

ea 

ea 

66 

a8b8 

ea 

ea 

a9 

20 

20 

d2 

ff 

aO 

60 

a8c0 

00 

bl 

fa 

aa 

c8 

bl 

fa 

a8 

04 

a8c8 

20 

03 

cO 

18 

a5 

fa 

69 

20 

b5 

a8d0 

85 

fa 

a5 

fb 

69 

00 

85 

fb 

60 

a8d8 

ae 

Ob 

a8 

a4 

d6 

c8 

20 

8f 

le 

a8e0 

a7 

ee 

Od 

a8 

ee 

Oe 

a8 

ad 

b4 

a8e8 

Od 

a8 

cd 

Oa 

a8 

fO 

Od 

ad 

aO 

a8f0 

Oe 

a8 

c9 

Oe 

fO 

06 

ea 

ea 

47 

a8f 8 

ea 

4c 

ae 

a8 

a5 

fa 

8d 

Of 

4f 

a900 

a8 

a5 

fb 

8d 

10 

«8 

ea 

ea 

f 3 

a908 

ea 

ea 

ea 

60 

20 

82 

a9 

ad 

46 

a910 

17 

a8 

85 

fa 

ad 

18 

a8 

85 

85 

a918 

fb 

aO 

28 

a9 

3e 

91 

fa 

aO 

40 

a920 

42 

a9 

3c 

91 

fa 

60 

86 

fa 

3b 

a928 

84 

fb 

a5 

fa 

38 

e9 

00 

85 

50 

a930 

fa 

a5 

fb 

e9 

04 

85 

fb 

aO 

d6 

a938 

00 

a5 

fa 

85 

fc 

38 

e9 

28 

04 

a940 

85 

fa 

a5 

fb 

e9 

00 

85 

fb 

d8 

a948 

c9 

ff 

fO 

04 

68 

4c 

39 

a9 

f 5 

a950 

a6 

fc 

60 

ad 

Oe 

a8 

38 

ed 

25 


a958 

: 19 

a8 

aa 

ad 

Of 

a8 

85 

fa 

68 

a960 

: ad 

10 

a8 

85 

fb 

38 

a5 

fa 

fe 

a968 

: e9 

20 

85 

fa 

a5 

fb 

e9 

00 

04 

a970 

: 85 

fb 

ca 

eO 

00 

dO 

ee 

a5 

4f 

a978 

: fa 

8d 

21 

a8 

a5 

fb 

8d 

22 

4b 

a980 

: a8 

60 

ad 

03 

a8 

85 

fa 

ad 

22 

a988 

: 04 

a8 

85 

fb 

a2 

00 

aO 

00 

6e 

a990 

: a9 

aO 

91 

fa 

aO 

la 

91 

fa 

64 

a998 

: 18 

a5 

fa 

69 

28 

85 

fa 

a5 

54 

a9a0 

: fb 

69 

00 

85 

fb 

e8 

eO 

10 

ab 

a9a8 

: dO 

e4 

60 

20 

50 

a8 

ee 

23 

53 

a9b0 

: a8 

ad 

23 

a8 

c9 

Oe 

dO 

47 

ec 

a9b8 

: ee 

24 

a8 

ad 

24 

a8 

c9 

04 

4f 

a9c0 

: dO 

17 

a9 

c9 

8d 

03 

aB 

a9 

a6 

a9c8 

: 04 

8d 

04 

a8 

:;9 

06 

8d 

02 

ae 

a9d0 

: a8 

a9 

00 

8d 

24 

a8 

4c 

ed 

93 

a9d8 

: a9 

18 

ad 

03 

a8 

69 

29 

8d 

ef 

a9e0 

: 03 

a8 

ad 

04 

a8 

69 

00 

8d 

14 

a9e8 

: 04 

a8 

ce 

02 

a8 

ad 

02 

a8 

86 

a9f0 

: a2 

lf 

aO 

10 

20 

c6 

a6 

20 

5f 

a9f 8 

: 50 

■8 

a9 

00 

8d 

23 

a8 

ae 

f9 

aaOO 

: 03 

a8 

ac 

04 

a8 

20 

26 

a9 

7a 

aa08 

: c8 

e8 

8e 

Ob 

a8 

8c 

Oc 

a8 

ba 

aalO 

: 18 

ad 

23 

a8 

6d 

Oc 

aB 

Bd 

d2 

aalB 

: Oc 

a8 

a8 

20 

8f 

a7 

ad 

Of 

bl 

aa20 

: a8 

85 

fa 

ad 

10 

a8 

85 

fb 

53 

aa28 

: 20 

b6 

al 

ea 

ea 

ea 

ea 

ea 

fO 

aa30 

: ea 

ea 

ea 

ea 

ea 

oa 

ea 

ea 

2f 

aa38 

: ea 

ea 

4c 

48 

aa 

a2 

2a 

20 

5c 

aa40 

: 57 

a6 

20 

e4 

ff 

fO 

fb 

60 

c7 

aa48 

: a9 

20 

20 

d2 

ff 

bl 

fa 

c8 

6f 

aa50 

: 2a 

2a 

aa 

8d 

3c 

03 

bd 

4c 

57 

aa5B 

: ac 

20 

d2 

ff 

c9 

20 

fO 

04 

32 

aa60 

: e8 

4c 

56 

aa 

bl 

fa 

20 

d2 

72 

aa68 

: ff 

a9 

20 

20 

d2 

ff 

c8 

bl 

fc 

aa70 

: fa 

20 

d2 

ff 

c8 

bl 

fa 

20 

75 

aa78 

: d2 

ff 

ad 

Ob 

a8 

18 

69 

la 

3c 

aa80 

aa 

ac 

Oc 

a8 

20 

Bf 

a7 

aO 

f 7 

aa88 

: 00 

bl 

fa 

aa 

c8 

bl 

fa 

a8 

cc 

aa90 

: 20 

03 

cO 

20 

3d 

aa 

c9 

45 

41 

aa98 

: fO 

01 

60 

a2 

08 

20 

57 

a6 

al 

aaaO 

: ac 

Oc 

a8 

a9 

02 

18 

6d 

24 

90 

aaaB 

: a8 

aa 

20 

8f 

a7 

a9 

10 

a2 

ed 

aabO 

: 90 

aO 

03 

20 

16 

a7 

18 

a9 

a8 

aab8 

: 17 

6d 

24 

a8 

aa 

a4 

d6 

20 

Of 

aacO 

: 8f 

a7 

a9 

01 

a2 

a3 

aO 

03 

7d 

aac8 

: 20 

16 

a7 

ad 

a3 

03 

c9 

41 

8f 

aadO 

: fO 

07 

c9 

42 

fO 

03 

4c 

b6 

c4 

aad8 

: aa 

18 

a9 

19 

6d 

24 

a8 

aa 

Oc 

aaeO 

: a4 

d6 

20 

8f 

a7 

a9 

02 

a2 

fe 

aae8 

: a4 

aO 

03 

20 

16 

a7 

18 

a9 

f 4 

aafO 

: lc 

6d 

24 

a8 

aa 

a4 

d6 

20 

4c 

aaf 8 

: 8f 

a7 

a9 

03 

a2 

bO 

aO 

03 

5e 

abOO 

: 20 

16 

a7 

a9 

00 

91 

fc 

ad 

26 

ab08 

: Of 

a8 

85 

fa 

ad 

10 

a8 

85 

35 

ablO 

: fb 

aO 

02 

a2 

00 

bd 

90 

03 

66 

abl8 

: 91 

fa 

c8 

e8 

eO 

10 

dO 

f 5 

33 

ab20 

: e8 

c8 

ad 

a3 

03 

91 

fa 

c8 

86 

ab28 

: ad 

a4 

03 

91 

fa 

c8 

ad 

a5 

12 

ab30 

: 03 

91 

fa 

20 

Oe 

cO 

a5 

14 

64 

ab38 

: a6 

15 

aO 

00 

91 

fa 

c8 

8a 

ba 

ab40 

: 91 

fa 

ce 

23 

a8 

4c 

ab 

a9 

55 

ab48 

: a2 

96 

a9 

00 

aO 

Oa 

20 

96 

a8 

ab 50 

: a7 

a9 

40 

8d 

25 

a8 

a9 

06 

d8 

ab58 

: 8d 

26 

a8 

60 

a9 

26 

aO 

ac 

d6 

ab60 

: a2 

02 

85 

fa 

84 

fb 

86 

fc 

00 

ab68 

: 4c 

25 

a6 

00 

ff 

00 

ff 

00 

fO 


Listing 3: »CCTM1B« - Routinen 2 


Name 

cctm2 





cOOO c600 































c0b8 

: 01 

a8 

a9 

Od 

9d 

f 8 

07 

a2 

lc 

cl78 

49 

52 

45 

43 

54 

4f 

52 

59 

60 

cOOO 

00 

el 

11 

el 

17 

el 

ld 

el 

2a 

cOcO 

: 00 

bd 

40 

a4 

9d 

3d 

03 

e8 

e5 

cl80 

n 

53 

45 

4c 

45 

43 

54 

49 

68 

c008 

23 

el 

2b 

el 

32 

el 

37 

el 

f 6 

c0c8 

: eO 

40 

dO 

f 5 

ad 

01 

a8 

c9 

d4 

cl88 

4e 

47 

11 

45 

4e 

54 

52 

59 

ea 

cOlO 

49 

el 

5f 

el 

70 

el 

81 

el 

3e 

cOdO 

: 00 

dO 

03 

4c 

8e 

c9 

c9 

01 

e3 

cl90 

20 

45 

58 

49 

53 

54 

53 

11 

d9 

c018 

8b 

el 

98 

el 

aa 

el 

b5 

el 

4a 

c0d8 

: dO 

03 

4c 

5a 

cb 

c9 

02 

dO 

3d 

cl98 

4e 

45 

58 

54 

20 

■14 

49 

53 

19 

c020 

cb 

el 

de 

el 

ef 

el 

fb 

el 

11 

cOeO 

: 03 

4c 

6e 

c8 

c9 

03 

dO 

03 

bc 

claO 

4b 

2c 

20 

50 

4c 

45 

41 

53 

ae 

c028 

05 

e2 

16 

e2 

2b 

e2 

3f 

e2 

Od 

c0e8 

: 4c 

ae 

c2 

c9 

04 

dO 

03 

4c 

el 

cla8 

45 

11 

13 

ld 

ld 

ld 

ld 

ld 

48 

c030 

51 

e2 

61 

e2 

64 

e2 

71 

e2 

90 

cOfO 

: 4e 

ce 

c9 

05 

dO 

03 

4c 

29 

61 

clbO 

ld 

ld 

ld 

ld 

11 

13 

ld 

ld 

9f 

c038 

7e 

e2 

9a 

e2 

a7 

e2 

b6 

e2 

5c 

cOf 8 

: cc 

4c 

73 

ce 

a2 

Oa 

20 

61 

5f 

clb8 

ld 

ld 

ld 

ld 

ld 

ld 

ld 

ld 

b8 

c040 

bf 

e2 

de 

e2 

f 3 

e2 

08 

e3 

c2 

clOO 

: 43 

48 

41 

4e 

47 

45 

20 

48 

31 

clcO 

ld 

ld 

ld 

ld 

20 

20 

20 

9d 

16 

c048 

20 

e3 

2c 

e3 

3e 

e3 

50 

e3 

ed 

cl08 

: 45 

41 

44 

45 

52 

20 

3f 

2e 

27 

clc8 

9d 

9d 

11 

43 

48 

4f 

4f 

53 

c3 

c050 

5b 

e3 

5e 

e3 

71 

e3 

81 

e3 

b5 

cllO 

: 11 

4e 

41 

4d 

45 

3a 

11 

49 

3f 

cldO 

45 

20 

43 

52 

49 

54 

45 

52 

31 

c058 

8e 

e3 

ac 

e3 

c7 

e3 

db 

e3 

52 

cll8 

: 44 

20 

20 

3a 

11 

53 

49 

44 

15 

cld8 

49 

43 

53 

11 

12 

9a 

3c 

31 

03 

c060 

e6 

e3 

ef 

e3 

Of 

e4 

19 

e4 

f 6 

cl20 

: 45 

3a 

11 

45 

44 

49 

54 

49 

e2 

cleO 

3e 

2e 

2e 

2e 

20 

41 

4c 

50 

65 

c068 

39 

e4 

59 

o4 

79 

e4 

99 

e4 

f 5 

cl28 

: 4e 

47 

11 

13 

92 

ld 

ld 

ld 

81 

cle8 

48 

41 

42 

45 

54 

20 

ii 

3c 

Od 

c070 

ac 

e4 

c5 

e4 

dl 

e4 

db 

e4 

la 

cl30 

: 9a 

11 

ld 

ld 

ld 

ld 

11 

43 

c3 

cif 0 

32 

3e 

2e 

2e 

2e 

20 

53 

49 

56 

c078 

e5 

e4 

ef 

e4 

f 9 

e4 

03 

e5 

06 

cl38 

: 48 

4f 

4f 

53 

45 

20 

3c 

41 

2f 

cif 8 

44 
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Kopieren mit Komfort: 
Super-Copy 


Ein gutes Kopierprogramm braucht jeder. Hier ist 
es: Super-Copy. Bis zu 32 Programme mit insge¬ 
samt 234 Blöcken lassen sich mit »Super-Copy« 
in einem Rutsch mit und ohne Speeder problem¬ 
los kopieren. 

as soll ein gutes Kopierprogramm leisten? Nun, zu¬ 
nächst einmal soll es kopieren. Dazu muß man aus¬ 
wählen können, was kopiert werden soll. Fehler 
beim Kopieren sollen möglichst ohne Programmabsturz 
und völligen Neubeginn behebbar sein. Gerade hier liegt 
eine Stärke von »Super-Copy« (Listing 1). Alle Funktionen, 
die man sonst noch beim Kopieren braucht (Formatieren, 
Gültigkeitskontrolle (Vality check) etc.), sollen integriert 
sein. Dazu gehört auch eine komfortable Löschmöglich¬ 
keit, um Disketten »aufzuräumen«. Schließlich soll das Pro¬ 
gramm möglichst wenig Speicherplatz belegen, damit zum 
Kopieren genug zur Verfügung steht. Von großer Wichtig¬ 
keit ist auch die Kompatibilität zu den verschiedenen Flop- 
py-Laufwerken von Commodore. Doch auch hier können 
wir Sie beruhigen. Super-Copy arbeitet mit der Floppy 


1541, 1541c, den Floppies 1570/1571 und sogar mit der 
brandneuen 1541 II problemlos zusammen. 

Aus all dem ergibt sich eine Konsequenz: Ein solches 
Programm läßt sich nur in Maschinensprache schreiben, 
da Basic einfach zu langsam ist und zuviel Speicherplatz 
belegt. Trotzdem sind einige Einschränkungen gemacht 
worden: 

Relative Files können nicht kopiert werden. Dies verlangt 
eine zu aufwendige Verwaltung und kommt auch zu selten 
vor, um es im Programm zu integrieren. In einem Pro¬ 
grammdurchlauf können höchstens 32 Files kopiert wer¬ 
den. Mehr Filenamen kann das Programm nicht speichern. 

Ansonsten aber läßt »Super-Copy« kaum noch Wünsche 
offen, höchstens den nach einem schnelleren Laufwerk. 
Aber auch da läßt sich wohl noch etwas machen. 

Wie arbeitet »Super Copy«? 

Nach dem Programmstart mit RUN meldet sich das Pro¬ 
gramm mit einem Menü: 

1. Directory 4. Scratchen 

2. Kopieren 5. Validieren 

3. Formatieren 6. Ende 
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Durch Druck auf eine Ziffer wählen Sie die entsprechen¬ 
de Funktion. Übrigens können Sie im Programm immer 
dann, wenn Sie irgendeine Taste drücken müssen, mit 
< — > in dieses Menü zurückkehren. Gehen wir nun die 
einzelnen Funktionen einmal durch. 

Zur Funktion »Directory« ist nicht viel zu sagen. Es er¬ 
scheint das Verzeichnis aller Files auf der Diskette. 

Beim »Formatieren« müssen Sie den Diskettennamen 
und die ID - wie üblich durch ein Komma getrennt - ange¬ 
ben. Eine ID ist nur bei einer neuen Diskette wichtig. Ver¬ 
zichten Sie darauf, werden zwar alle Einträge im Directory 
gelöscht, aber es entfällt das Neuformatieren der einzelnen 
Spuren. »Validieren« (Gültigkeitskontrolle) entspricht dem 
Basic-Befehl OPEN 1,8,15,”V":CLOSE 1. 

Entscheiden Sie sich für »Kopieren«, werden Sie aufge¬ 
fordert, die Quelldiskette einzulegen. Nach Tastendruck er¬ 
scheinen nun die Namen der Programme. Files, die kopiert 
werden sollen, kennzeichnen Sie mit der J-Taste, die ande¬ 
ren mit < N >. Relative Files können nicht kopiert werden, 
daher erscheint eine Fehlermeldung, wenn Sie versuchen, 
solche Files mit <J> zu markieren. Das Programm kann 
maximal 32 Namen speichern. Wenn Sie mehr als 32 Files 
kopieren wollen, erscheint die Fehlermeldung »Kopierliste 
voll«. Sie können nun die bisher markierten Programme ko¬ 
pieren und nach Abschluß einen neuen Programmdurch¬ 
laufstarten. Haben Sie Ihre Auswahl beendet, gibt das Pro¬ 
gramm an, wieviele Blöcke insgesamt zu kopieren sind, da¬ 
mit Sie genügend Platz auf der Zieldiskette bereitstellen 
können. Ein neues Menü erscheint: 

1. Directory 

2. Formatieren 

3. Validieren 
*** Space*** 

für weiter 

Sie können nun in aller Ruhe eine Zieldiskette aussu¬ 
chen, eventuell noch formatieren etc. Sie kommen in jedem 
Fall in dieses Menü zurück. Sind alle Vorbereitungen abge¬ 
schlossen, drücken Sie < SPACE >, um mit dem Kopieren 
fortzufahren. Das Programm fordert nun auf, die Quelldis¬ 
kette einzulegen und liest die vorher markierten Program¬ 
me ein. Sollte dabei ein Fehler auftreten, weil Sie zum Bei¬ 
spiel die falsche Diskette eingelegt haben, wird eine ent¬ 
sprechende Meldung ausgegeben und gefragt, ob dieses 
File übersprungen oder ein neuer Versuch unternommen 
werden soll. Auch Lesefehler des Laufwerks werden in die¬ 
ser Weise gehandhabt. In einem Durchgang können maxi¬ 
mal 234 Blöcke (58 KByte!) eingelesen werden. Ist noch 
mehr zu kopieren, wird das Einlesen abgebrochen. 


Jetzt müssen Sie angeben, ob Sie fortlaufend oder ein¬ 
zeln kopieren möchten. Fortlaufend bedeutet, daß die Files 
der Reihe nach auf dieselbe Diskette geschrieben werden. 
Beim Einzelkopieren dagegen springt das Programm nach 
jedem Schreibvorgang wieder in ein Menü, und Sie haben 
die Möglichkeit, die Diskette zu wechseln, ein Directory an¬ 
zusehen, zu formatieren oder zu validieren. Außerdem kön¬ 
nen Sie auch das zuletzt kopierte Programm noch einmal 
auf eine andere Diskette kopieren. Das jeweils nächste File 
wird vor dem Schreiben angezeigt, damit Sie die richtige 
Zieldiskette einlegen können. 

Komfortable Bedienung 


Haben Sie Ihre Wahl getroffen, läuft der Schreibvorgang in 
der oben beschriebenen Art und Weise ab. Schreibfehler 
werden wie Lesefehler behandelt, das heißt es wird gefragt, 
ob ein neuer Versuch gestartet oder das File übersprungen 
werden soll. 

Sind alle Programme kopiert, erscheint die Meldung 
»KOPIE FERTIG«. Sind aber nach dem ersten Le- 
se/Schreib-Durchgang noch weitere Programme zu kopie¬ 
ren, fährt das Programm mit der Aufforderung zum Einle¬ 
gen der Quelldiskette fort. 

»Scratchen«, also das Löschen von Programmen, gehört 
zu den angenehmsten Funktionen, die »Super Copy« zu 
bieten hat. Seien Sie aber vorsichtig, sonst haben Sie bald 
überhaupt keine Programme mehr. Der Ablauf ist ähnlich 
wie beim Kopieren. Doch anstatt die Files zum Kopieren zu 
kennzeichnen, werden sie nun zum Löschen markiert. Soll¬ 
ten Sie einen Fehler gemacht haben, ist noch nichts verlo¬ 
ren, denn am Ende des Markiervorgangs müssen Sie noch 
arupal durch Drücken der SPACE-Taste bestätigen, daß es 
Ihnen ernst mit dem Löschen ist. 

Zum Programmaufbau: 

Ausführliche Erläuterungen des Assemblerquelltextes 
möchten wir Ihnen ersparen. Nur soviel: Das Programm ist 
im wesentlichen modular aufgebaut, das heißt es besteht 
aus einzelnen Blöcken, die von den verschiedenen Menüs 
aus angesprungen werden. 

Daher ist es nicht nötig, häufig vorkommende Pro¬ 
grammteile wie Tasten- oder Fehlerabfragen ständig neu zu 
schreiben. Auch der Teil zum Markieren der Programme ist 
beim Scratchen und beim Kopieren identisch. 

Eine solche Programmiertechnik trägt dazu bei, die Pro¬ 
gramme ebenso kurz wie übersichtlich zu halten. 

(Dietrich Weineck/sk) 
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Graphic Art - die Antwort 
auf das Spriteproblem 


Sprites sind eine sehr schöne Einrichtung des 
C64. Mit diesem Programm lassen sich ein- und 
mehrfarbige Sprites leicht konstruieren, bearbei¬ 
ten und speichern. 

D ieser Sprite-Editor (Listing 1 und 2) besteht aus zwei 
Teilen: einem Maschinenspracheteil, der schnelle 
Routinen zur Cursorsteuerung und zum Verschieben 
enthält und einem Basic-Teil, der der Tastaturabfrage dient. 



Bild 1. Snoopy erstellt mit »Graphic Art« 


Diese »Zweiteilung« wirkt sich aber in keiner Weise auf die 
Gesamtgeschwindigkeit des Programms aus. Vielmehr er¬ 
spart sie beim Abtippen die Eingabe stupider Zahlenkolon¬ 
nen. Das Basic-Programm baut das Menü auf und läßt die 
verwendeten Sprites an der richtigen Position erscheinen 
(Bild 1). Malt man mit »Graphic Art« seine Figur, so wird sie 
gleich als Sprite oben in der rechten Ecke angezeigt (und 
zwar normal und in x-, y- und x/y-Richtung vergrößert). So 
hat man sein Ergebnis immer gleich vor Augen. 

Der Basic-Teil (Listing 1) steuert auch noch die Disketten- 
Operationen. So lassen sich die eben erstellten Sprites ab¬ 
speichern oder alte zur weiteren Verschönerung einiesen. 
Man kann den Fehlerkanal abfragen und Disketten-Befehle 
senden. 

Im Maschinenteil sind all die Routinen untergebracht, die 
in Basic zu langsam wären. Dieses sind zum Beispiel die 
Cursorsteuerung und das eigentliche Zeichnen, der Auf¬ 
bau der Zeichenmatrix und, nicht zu vergessen, die Scroll- 
Routinen. Mit »Graphic Art« lassen sich in Sekunden¬ 
schnelle die Sprites in alle Richtungen verschieben (dieses 
ist sehr wichtig, wenn man sich beim Zeichnen mal um ein 
paar Bildschirmpositionen geirrt hat). 

Die Bedienung von Graphic Art 


Soviel zu den Möglichkeiten und zum Aufbau des Pro¬ 
gramms. Doch nun zur Bedienung von »Graphic Art«. 
Nachdem man den Basic-Teil (Listing 1) gestartet hat, wird 
der Maschinenspracheteil (Listing 2) nachgeladen (er steht 
dann von 49152 -$C000- bis SC700- 50944). Anschließend 
erscheint das Menü im Mehrfarbmodus. Die Umschaltung 
in den Einfarbmodus (und wieder zurück) erfolgt durch 


Drücken der M-Taste. Es wird dann ein ähnliches Menü wie 
beim Mehrfarbmodus neu aufgebaut. 

Nachdem Sie sich für die Art der Sprites entschieden ha¬ 
ben, kann es ans Zeichnen gehen. Gezeichnet wird nur mit 
dem Joystick (PORT 2), wobei ein Druck auf den Feuer¬ 
knopf einen Punkt setzt beziehungsweise wieder löscht. 
Auf eine zusätzliche Steuerung mit den Cursor-Tasten wur¬ 
de verzichtet, da über diese Tasten das Verschieben der 
Sprites geregelt wird. Dieses geht nicht nur schnell, son¬ 
dern damit auch in den gewohnten Richtungen besonders 
einfach und übersichtlich. 

Die Spritefarben werden alle über die Funktionstasten 
gesteuert, wobei <F1/F2> für die Hauptspritefarbe 
(SD027), <F3/F4> für die Hintergrundfarbe (es erscheint 
ein Farbfenster direkt hinter den Sprites), < F5/F6 > für die 
erste Nebenspritefarbe ($D025 - nur wichtig für den Multico- 
lour-Modus) und <F7/F8> für die Nebenfarbe 2 ($D026) gilt. 

Im Multicolour-Modus werden alle drei Farben angezeigt 
(Multicolour-Sprites erlauben das Zeichnen mit höchstens 
drei Farben). Das gleiche gilt auch für die aktuelle Zeichen¬ 
farbe. Sie kann man aus den Spritefarben 1 bis 3 durch 
Drücken von <SHIFT> und der entsprechenden Farb- 
nummer (also 1, 2 oder 3) auswählen. Der Zeichenfarb¬ 
wechsel wird dann angezeigt. 

Um im Multicolour-Modus Sprites zu erstellen, gehen Sie 
am Lasten so vor: Zuerst entscheiden Sie, welche drei Far¬ 
ben Ihr Sprite haben soll (mit Funktions-Tasten). Anschlie¬ 
ßend wählen Sie die Zeichenfarbe und beginnen zu-zeich- 
nen. Achtung, wenn Sie eine der drei Farben wechseln wol¬ 
len, so wird jeder Punkt, der mit dieser Farbe gezeichnet 
wurde, auf die neu eingestellte Farbe umgestellt! Sollte die 
Farbe, die geändert wird, die aktuelle Zeichenfarbe sein, so 
passen Sie bitte anschließend die Zeichenfarbe neu an (mit 
< SHIFT> und Farbnummer), da sich das Programm nicht 
merkt, welche der drei Farben die Zeichenfarbe ist. 

Der Spritepuffer 


Mit »Graphic Art« lassen sich acht Sprites direkt im Compu¬ 
ter ablegen. Dem Benutzer stehen folglich acht «Sprite- 
Ablegebereiche« zur Verfügung, in die man durch Drücken 
der < I >-Taste den gerade sichtbaren Bereich hinein¬ 
schreiben kann. Zurückholen läßt sich das Sprite mit der 
< * >-Taste. Natürlich wird das gerade sichtbare Sprite da¬ 
bei überschrieben. »Graphic Art« bietet auch die Möglich¬ 
keit des Speicherns der Spritedaten auf Diskette sowie (für 
Nicht-Floppy-Besitzer) der Ausgabe der Daten auf Bild¬ 
schirm und Drucker. 

Drücken Sie <A> für Ausgabe und im unteren Teil des 
Menüs erscheinen die drei Wahlmöglichkeiten. Drücken 
Sie nun < 1 > für Diskette, so wird das Sprite, nachdem ihm 
ein Name gegeben wurde, auf Diskette als SEQ-Datei ge¬ 
speichert und läßt sich nun leicht in eigene Programme 
nachladen (so erspart man sich die DATA-Zeilen - aber Ach¬ 
tung: die Farben werden nicht mit gespeichert! Sie müssen 
nach Laden der Daten in die entsprechenden Farbregister 
gePOKEt werden). 

Wer lieber DATAs mag oder kein Disketten-Laufwerk hat, 
der kann sich die Spritedaten ausdrucken oder auf dem 
Bildschirm ausgeben lassen. In diesem Fall wird man noch 
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gefragt, ob das Programm beendet werden soll. Wenn ja, 
so wird der Editor gelöscht. Dafür stehen nun in den Zeilen 
1 bis 6 die Spritedaten. Diese können nun mit einem MER- 
GE in Ihr Programm übernommen werden. 

Natürlich ist es auch möglich, gespeicherte Sprites wie¬ 
der zu laden und weiter zu bearbeiten. Dazu drückt man die 
<*-> -Taste. 

Floppy-Besitzer werden sich freuen, denn »Graphic Art« 
läßt auch die Eingabe von Disketten-Befehlen zu. So kann 
man eine Diskette neu formatieren, ein File löschen und so 
weiter. Dieses und die Abfrage des Fehlerkanals wird durch 
den Druck auf die Klammeraffen-Taste ermöglicht. 

Damit ist die Bedienung der Aus- und Eingabegeräte er¬ 
klärt. Es sei nur noch angemerkt, daß alle Untermenüs 
durch Drücken der RETURN-Taste verlassen werden kön¬ 
nen. Nun soll noch auf das Zeichnen selbst mit »Graphic 
Art« noch ein wenig genauer eingegangen werden. 

Normalerweise wird durch Drücken des Feuerknopfes 
ein Punkt gesetzt oder gelöscht. Durch ständiges Drücken 
kann das Ziehen einer horizontalen Linie erreicht werden. 
Ist jedoch das Zeichnen einer vertikalen Linie erwünscht, 
so schaltet man den DRAW-Modus ein (Einschalten mit 
<D>, Abschalten mit <SHIFTD>). Nun wird jeder Punkt, 
über den man mit dem Cursor fährt, gesetzt (oder ge¬ 
löscht). So ist ein Zeichnen von Linien sehr einfach. 

So wird gezeichnet 


Manchmal ist das Löschen aber dabei nicht erwünscht 
(zum Beispiel wenn eine Fläche ausgefüllt werden soll). 
»Graphic Art« bietet hierfür die Möglichkeit, mit dem Feu¬ 
erknopf (beziehungsweise im Draw-Modus bei Cursorbe¬ 
wegung) nur zu setzen und nicht zu löschen. Dieses Nur- 
Setzen wird im Menü durch den S-Modus gekennzeichnet 
- im Gegensatz dazu der Setzen/Löschen-(S/L-)Modus. 
Durch Drücken der S-Taste kann man sich den gewünsch¬ 
ten Modus auswählen. Der S-Modus funktioniert aber nur 
bei der Erstellung der Einfarbsprites. Allerdings ist es mög¬ 
lich, durch Drücken der SPACE-Taste doch noch einen 
Punkt zu löschen. 

Und nun noch ein paar Kleinigkeiten: 

Durch Drücken der Tasten <1 > bis <9> wird eine Ge¬ 
schwindigkeitsänderung des Cursors erreicht. Auch eine 
Reverse-Funktion ist in »Graphic Art« mit eingebaut. Durch 
Betätigen der O-Taste erscheint das Sprite dann reverse. 
Dieses ist sehr angenehm und erspart viel Arbeit, wenn 
man ein fast ganz ausgefülltes Sprite malen will. Übrigens 
lassen sich einige Cursor-Bewegungen auch von der Tasta¬ 
tur aus steuern. So wird nach Drücken von <CLR> das 
Sprite gelöscht, ein <HOME> läßt den Cursor links oben 
in der Ecke erscheinen und < RETURN > setzt ihn an den 
Anfang der nächsten Zeile. 

Eine Sache noch, die besonders den Multicolour-Modus 
betrifft. Es kann Vorkommen, daß die Cursor-Lupe, die ei¬ 
gentlich gelb ist, nicht mehr erkannt werden kann, wenn 
das gerade bearbeitete Sprite ebenfalls zum Teil die glei¬ 
che Farbe besitzt. Um dennoch immer über die genaue Zei¬ 
chenposition im klaren zu sein, kann durch Betätigen der 
< +/->Tasten die Cursorfarbe geändert werden. 

Und nun zu guter Letzt noch zwei Hinweise zum Abtip¬ 
pen. Zum einen können die REMs alle weggelassen wer¬ 
den. Zum anderen ist in einige Basic-Zeilen so viel reinge¬ 
preßt worden, daß die Befehle zum Teil verkürzt eingege¬ 
ben werden müssen (für PRINT also »?« und so weiter - 
schauen Sie eventuell im Handbuch nach!). Vor dem Star¬ 
ten unbedingt beide Programme speichern! 

Ganz zum Schluß noch ein Tip: »Graphic Art« berechnet 
zwar Ihre Sprites, wie diese dann aber gesteuert werden, 
kann es nicht erraten. (Andreas Holz/M. Jobst/sk) 


ANDREAS A. HOLZ 
ZIKADENWEG 15 
1 BERLIN 19 
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5 POKE 56,61:POKE 55,192 

10 POKE 53280,0:POKE 53281,0:POKE 650,128: 
POKE 53272,23:PRINT"<CLR>" 

11 :: 

12 IF A=0 THEN A= 1: LOAD “MT—GRAF IK—ART “ , 8,1 

99 : : 

100 REM+++++++++++++++++++++++++++++ 

101 REM+ + 

102 REM+ GRAFIK-ART + 

103 REM+ + 

104 REM+ 

105 REM+ 

106 REM+ [30177283 

107 REM+ 

108 
109 :: 

120 FOR X=704 TO 766:READ A:POKE X,A:NEXT: 

REM SINGLE CUSOUR C1J. BLOCK3 
130 FOR X=896 TO 958:READ A:POKE X,A:NEXT: 

REM MULTI CUSOUR C14. BLOCK3 
135 FOR X=1 TO 9:READ SP(X>:NEXT:REM +++++ 
SPEED-DATAS 

140 V=53248:POKE V+21,143:POKE V+l4,0:POKE 
V+15,29:P0KE V+46,7:POKE V+29,134:P0K 
E V+23,140 

150 V*="[BLUE>7654321(LIG.BLUEJ0":L*="C39S 
PACE>":POKE 198,0 

155 GOSUB 710:GOSUB 830:SYS 49702:REM BILD 
SCHIRMAUFBAU+SPRITE LOESCHEN C13.BLOCK 
3 

170 POKE 2040,13:POKE V+16,6:P0KE V,255:PO 
KE V+l,51:POKE V+39,14:REM+ SPRITE 0 
180 POKE 2041,13:POKE V+2,2B:P0KE V+3,51:P 
OKE V+40,14:REM+++++++++++ SPRITE 1 
190 POKE 2042,13:POKE V+4,28:P0KE V+5,80:P 
OKE V+41,14:REM+++++++++++ SPRITE 2 
200 POKE 2043,13:POKE V+6,255:POKE V+7,80: 
POKE V+42,14:REM++++++++++ SPRITE 3 

298 :: 

299 POKE 198,0 

300 SYS 49152 

305 GET A*:IF A*=""GOTO 300 
310 T ' _ A*=" {F3J"THEN SYS 49682: GOTO 300 
320 IF A*="[F4>"THEN SYS 49692:GOTO 300 
322 IF AS=”[RIGHT>"THEN SYS 50559:GOTO 300 
324 IF A*="(LEFT>“THEN SYS 50542:GOTO 300 
326 IF M=" [DOWN>”THEN SYS 49879:GOTO 300 
328 IF A*="[UP>"THEN SYS 49931:GOTO 300 
350 IF A*="D"THEN SYS 49778:GOSUB 800:GOTO 
299 

355 IF A*="2"THEN SYS 49794:GOSUB 800:GOTO 
299 

360 IF A#="(CLR>"THEN SYS 49702:GOTO 299 
370 IF A*="[HOME>"THEN POKE V+l4,0:POKE V+ 
15,29:GOTO 299 

380 IF A*=CHR*(13)THEN IF PEEK(V+15)<>189 
THEN POKE V+14,0:POKE V+15,PEEK(V+15>+ 
8:GOTO 299 

390 IF A*="S"THEN SYS 49821:GOSUB 800:GOTO 
299 

392 IF A*="[F1>“THEN SYS 49720:GOTO 300 

393 IF A*="[F2>"THEN SYS 49735:GOTO 300 

394 IF A$="[F5>"THEN SYS 50502:GOTO 300 

395 IF A*="[F6>"THEN SYS 50522:GOTO 300 

396 IF A*="[F7>"THEN SYS 50512:GOTO 300 

397 IF A*="[F8>"THEN SYS 50532:GOTO 300 
400 IF A*=" “THEN IF PEEK(49405>=176 THEN 

SYS 49844:GOTO 300 

410 IF A*="0"THEN FOR X=832 TO 894:POKE X, 
255-PEEK(X>:NEXT:SYS 49548:G0T0 299 
490 IF A*="M"THEN SYS 50065:GOSUB 710:GOSU 
B 830:SYS 49548:GOTO 299 
495 IF A*="A"THEN GOSUB 1010:GOTO 300 
497 IF A*="S"GOTO 3005 

500 IF A*="!"THEN IF PEEK(49236)=15 THEN P 
OKE 49997,128:POKE 49996,PEEK(V+39):GO 
SUB 760:GOTO 299 

510 IF A*=CHR*(34)THEN IF PEEK(49236)=15 T 
HEN POKE 49997,64:POKE 49996,PEEK(V+37 
):GOSUB 760:GOTO 299 

520 IF A*=“#"THEN IF PEEK(49236)=15 THEN P 
OKE 49997,192:POKE 49996,PEEK(V+38):GO 
SUB 760:GOTO 299 

525 IF A*=”+"THEN GOSUB 4000:GOTO 299 


<078> 

<014> 

< 196> 
<077> 
<028> 
< 101 > 

< 174> 
<06B> 

< 176> 
< 200 > 
<078> 
<160> 
<180> 

< 109> 
<03B> 

<063> 

<B36> 

<099> 

< 113> 
<083> 

<127> 

<032> 

< 199> 

< 212 > 

< 212 > 

<229> 

<209> 

< 104> 
<018> 
<124> 
< 200 > 
<237> 
<108> 
<084> 

< 177> 

<23B> 

<17B> 

<038> 

<032> 

<185> 

<249> 

<234> 

< 175> 

< 166> 
<041 > 

< 105> 
<236> 

<027> 

<103> 

< 142> 

< 155> 

< 150> 


< 012 > 


<217> 


<096> 

<044> 


Listing 1. »Graphic Art«. Bitte mit dem Checksummer auf 
Seite 158 eingeben. 
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LISTINGS 


527 IF ASC(AS)>48 AND ASC(AS)<58 THEN PDKE 

1661,12B+ASC (AS > s PQKE 49294 ,SP(ASC(AS 
)-48):GOTO 300 <075> 

528 IF AS="+"THEN IF PEEK(V+46)<>255 THEN 

POKE V+46,PEEK(V+46)+1:GOTO 299 <226> 

529 IF AS="-"THEN IF PEEK(V+46)<>0 THEN Pü 

KE V+46,PEEK(V+46)-1:GOTO 299 <057> 

535 IF AS="t"GOTO 7010 <077> 

540 IF AS="*“GOTO 7050 <120> 

550 GOTO 300 <242> 

701 REM+ + <010> 

702 REM+ BILDSCHIRMAUFBAU + <018> 

703 REM+ + <012> 

704 REM++++++++++++++++++++++++ <246> 

705 s: <126> 

710 POKE V+14,0s POKE V+15,29 <088> 

715 PRINT"(CLR>";sIF PEEK(49236)-15 GOTO 7 

40 <093> 

720 FOR X=1 TO 21:PRINT"(RED>+++++++++++++ 
+++++++++++(BLUEVXsNEXTs FOR X=0 TO 2s 
PRINT VS;sNEXT <057> 

730 POKE 2047,11sPOKE V+28,0sGOTO 800 <039> 

740 FOR X-l TO 21sPRINT"{RED>3FBF5F3FSrara 
PSFBF5FSrSF<BLUE>"XsNEXTsFOR X=0 TO 2s 
PRINT VS;sNEXT <074> 

750 POKE 2047,14sPOKE V+28,15 <078> 

760 POKE 214,17s POKE 211,28sSYS 5B640SPRIN 
T"(CYAN>AEICHEN- ";sPOKE 646,PEEK(4999 
6)s PRINT"{RVSON,2SPACE,DOWN,2LEFT,2SPA 
CE.RVOFFJ" <19S> 

765 POKE 214,18sPOKE 211,31sSYS 58640SPRIN 

T"ICYANJFARBE" <149> 

770 POKE 214,20sPOKE 211,28sSYS 58640SPRIN 
T"(LIG.RED>£ARBE #1 “;sPOKE 646,PEEK(5 
3287)SPRINT”{RVSON,2SPACE,RV0FF>" <135> 

7B0 POKE 214,21sPOKE 211,28sSYS 5B640SPRIN 
T“(RED>£ARBE #2 “;sPOKE 646,PEEK(53285 
)s PRINT"{RVSON,2SPACE,RVOFF}" <190> 

790 POKE 214,22sPOKE 211,28s SYS 58640sPRIN 
T"(PURPLEJEARBE #3 ";sPOKE 646,PEEK(53 
286)SPRINT“{RVSON,2SPACE,RVOFF>" <211> 

800 POKE 214,11sPOKE 211,28sSYS 58640s PRIN 

T * (BLUE > -KAUM (SPACE , RVSON , SPACE > A " ; < 154 > 

805 IF PEEK(49280)0234 GOTO 808 <120> 

806 PRINT"N(2SPACE,RVOFF>“s GOTO B10 <1B8> 

808 PRINT"US(SPACE,RVOFF>" <025> 

810 POKE 214,13sPOKE 211,28s SYS 58640sPRIN 

T" (LIG. BLUE JS/i.-flODUS-S“ : IF PEEK (49404 
> =43 THEN POKE 1582,128+PEEK(1582) <033> 

820 IF PEEK(49404)043 THEN FOR X-1572 TO 

1574sPOKE X,128+PEEK(X)sNEXTsRETURN <1S7> 

825 RETURN <121> 

830 POKE 214,15sPOKE 211,28sSYS 58640sPRIN 
T “ (GREEN > .5_PJüm # (SPACE , RVSON , SPACE J5 (S 
PACE,RVOFF>"sPOKE 49294,64sRETURN <238> 

839 ss <006> 

840 REM++++ SINGLE-SPRITE-DATAS ++++ <017> 

845 DATA,,,,,,,,,,,,,,,,,,,,,,,,,,,,7,,,8, 

128.. 16.64..16.64..8.192..7.224...48 <168> 

850 DATA,,24,,,,,,. <035> 

900 s <114> 

905 REM++++ MULTI -SPRITE-DATA'S ++++ <039> 

910 DATA,,,,,,,,,,,,,,,,,,,,,,,,,,,,,, ,31 , 

252.. 32.2..32.2..32.2..32.2..31.252., <192> 

915 DATA,,,,,,,,,,,, <0B7> 

920 s <134> 

925 REM++++ SPEED - DATAS ++++++++++++ <16B> 

930 DATA 80,75,6B,64,58,48,35,25,17 <193> 

935 ss <102> 

1000 REM+++++++++++++++++++++++ <116> 

+ <056> 

AUSGABE + <239> 

1003 REM+ + <058> 

1004 REM+++++++++++++++++++++++ <120> 

1005 s <219> 

1010 POKE 198,0sPOKE 214,23sP0KE 211,0sSYS 

58640s PRINT"(LIG.BLUE >AUSGABE..." <124 > 

1020 PRINT“1. AISK(3SPACEX2. ARUCKERC3SPAC 

E>3. SCREEN“; <172> 

1030 GET ASsIF AS="l“GOTO 2001 <204> 

1035 IF AS-"2" GOTO 1050 <087> 

1040 IF AS="3"THEN GOSUB 1055s GOTO 1080 <187> 

1042 IF AS=CHRS(13)THEN GOSUB 1095s GOTO 30 

0 <126> 


1001 REM+ 

1002 REM+ 


1045 

1050 


1055 

1060 


1065 

1070 


1080 

1090 

1095 

1097 

1098 

1099 

1100 
1101 


GOTO 1030 

OPEN 4,4s CMD 4sG0SUB 1060s PRINT#4:CLO 

SE 4 sGOSUB 1095s RETURN 

PRINT"(CLR>";sPOKE V+21,0 

FOR X=0 TO 4s PRINT X+l "DATA" ; : FOR XI- 

0 TO 10sPRINT PEEK(832+X1+X*12>"(LEFT 

>s"; 

NEXTsPRINT PEEK(832+X1+X*12) 
NEXTsPRINT X+l"DATA";sFOR X-892 TO 89 
3sPRINT PEEK(X)sNEXTsPRINT PEEK(8 
94)sRETURN 

INPUT"(2D0WN>£R0GRAMM ENDE";ASsIF MID 
S(AS,1,1)—"0"GOTO 5000 
GOSUB 710sGOSUB 830sPOKE V+21,143s SYS 
49548s RETURN 

FOR X-0 TO 1s POKE 214,23+XsPOKE 211,0 
sSYS 58640sPRINT LS;3NEXTsRETURN 
POKE 53280,2sPOKE 53265,PEEK(53265)AN 
D 239s RETURN 

POKE 53265,PEEK(53265)OR 16sPOKE 5328 
0,0 s RETURN 

OPEN 2,8,2,NS+“,S,W"sRETURN 
s s 

CLOSE 2 sGOSUB 1099 sGOSUB 1095s SYS 506 
07 s GOSUB 1098s WAIT 198,lsG0SUB 1095sS 
YS 65511s RETURN 


2000 

2001 


GOSUB 1095sGOSUB 4101sIF NS—""THEN GO 
SUB 1095s GOTO 300 

2010 GOSUB 1097sGOSUB 1099s OPEN 15,8,15s IN 
PUT#15,ASsIF A*O"00"GOTO 1101 
2015 FOR X—832 TO 832+62sPRINT#2,PEEK(X) 
2020 NEXT 

2025 CLOSE 2sCLOSE 15sG0SUB 1095sGOSUB 109 
8s RETURN 

3000 

3001 

3002 

3003 

3004 

3005 


REM+ 

REM+ 

REM+ 


DISK. 


+ 

+ 


3010 

3015 

3016 

3020 

3050 


3055 

3070 

3100 

3101 

3102 

3103 

3104 

3998 

3999 

4000 

4001 
4005 
4010 

4091 

4092 

4093 

4100 

4101 

4105 

4110 

4114 

4120 


POKE 214,23sPOKE 211,0sSYS 58640SPRIN 
T" (LIG. BLUETAISK. . . " s PRINT“ 1. JQPS (35P 
ACEJ2. AISK-STATUS"; 

GET ASsIF A*="1"GOTO 3050 
IF AS=“2"GOTO 3070 

IF AS=CHRS(13)THEN GOSUB 1095sGOTO 29 
9 

GOTO 3010 

GOSUB 1095 s POKE 214,23sP0KE 211,0sSYS 
58640sGOSUB 4100sIF NS—""THEN GOSUB 
1095s GOTO 300 

OPEN 1,8,15,NSsCLOSE lsBOSUB 1095sGOT 
O 300 

GOSUB 1095sSYS 50709sWAIT 198,1sGOSUB 
1095sPOKE 198,0s GOTO 299 

REM+ + 

REM+ EINGABE + 

REM+ + 

REM+++++++++++++++++++++++++++ 

OPEN 2,B,2,NS+",S,R"sRETURN 
CLOSE 2 sGOSUB 3998sGOSUB 1095s SYS 506 
07 s GOSUB 1098s WAIT 198,lsG0SUB 1095sS 
YS 65511s RETURN 

GOSUB 4101sIF NS—""THEN GOSUB 1095s GO 
TO 300 

GOSUB 1097s GOSUB 3998sOPEN 15,8,15s IN 
PUT#15,ASsIF AS< >"00"GOTO 3999 
FOR X—832 TO 832+623INPUT#2,AsPOKE X, 
AlNEXT 

CLOSE 2sCLOSE 15sGOSUB 1095s SYS 49548 
sGOSUB 1098s RETURN 
s s 

REM +++ GET NAME +++ 
s s 

NS=""sPOKE 214,23sPOKE 211,0sSYS 5864 
0SPRINT“(LIG.BLUEIAEFEHL? ";sN=29sG0T 
O 4105 

N*=""sPOKE 214,23sPOKE 211,0sSYS 5864 
0s PRINT“(LIG.BLUE}£ILENAME? “;s N=16 
A*=""sPOKE 198,0sPOKE 204,0 
GET ASsIF AS—""THEN 4110 
IF AS=CHRS(13)THEN POKE 204,1 SPRINT“ 

“;s RETURN 

IF AS—CHRS(20)THEN IF NS< >""THEN POKE 


<065> 


<223> 

<040> 


< 197> 
<051 > 


< 179> 
<209> 

< 172> 
<146> 
<201 > 

< 189> 

< 132> 
<013> 


< 163> 

< 151 >‘ 

< 156> 

<214> 

<239> 

<252> 

< 120 > 

< 112 > 
<024> 

< 113> 
<026> 

< 116> 


< 136> 
<217> 
<073> 

<235> 

<214> 


< 137> 

<02B> 

< 202 > 

<214> 

<126> 

< 179> 

< 12B> 
<214> 
<232> 


<013> 

< 126> 

<059> 

<078> 

<067> 

< 210 > 

< 178> 
< 212 > 

< 123> 

< 123> 
<232> 
<255> 

< 133> 
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204,15 PRINT"<LEFT,2SPACE,2LEFT}";:N* 
=LEFT*(N*,LEN(NS)-l):GOTO 4105 <035> 

4125 IF N*=""THEN IF A*=CHR*(20)THEN 4110 <062> 

4130 IF LEN(N*!=N THEN 4110 <072> 

4135 POKE 204,1:PRINT A*;:N*=N*+A*:GOTO 41 

05 <176> 

5000 POKE 631,19:FOR X=632 TO 632+6:POKE X 

,13:NEXT:POKE 198,7:NEW <217> 

7003 :: <074> 

7004 REM **** SPRITE-SPEICHER <175> 

7005 :: <076> 

7010 POKE 214,23:P0KE 211,0:SYS 58640:PRIN 

T"<LIG.BLUE>SPRITE SPEICHERN" <128> 

7015 N*="":N=1:PRINT“ JjPRITENR. <1-B>? M ;:B 

OSUB 4105:IF N*=““THEN GOTO 7065 <125> 


7016 X=VAL(N*):IF X<1 OR X>8 GOTO 7065 <246> 

7020 FOR X1=0 TO 62:POKE 15808+(64*(X-l)>+ 

XI,PEEK(832+X1):NEXT:GOSUB 1095:GOTO 
299 <052> 

7030 :: <101> 

7050 POKE 214,23:POKE 211,0:SYS 58640:PRIN 

T“CLIG.BLUEJjjPRITE EINLESEN" <006> 

7055 N*="“:N=1:PRINT"SPRITENR. (1-8)? ”;:G 
OSUB 4105:IF N*=“"THEN GOSUB 1095:GOT 
O 299 <115> 

7060 X=VAL(N*>:FOR X1=0 TO 62:POKE 832+X1, 

PEEK <15808+(64*(X-l))+X1):NEXT <054> 

7065 GOSUB 1095:SYS 49548:GOTO 299 <217> 


Listing 1. Basic-Listing zu »Graphic Art« (Schluß) 


Programm 

: 

nt— 

grafik 

-art 

C000 C700 

c248 


27 

d0 

ce 

28 

dB 

ce 

29 

d0 

Sa 

c4a8 


3c 

c5 

dB 

15 

a9 

6c 

91 

fa 

dB 












c250 


ce 

2a 

d0 

a2 

00 

a0 

00 

c8 

52 

c4b0 

: 

cB 

a9 

7b 

91 

fa 

a9 

02 

8d 

7e 












c258 


C0 

ff 

dB 

fb 

e8 

e0 

01 

d0 

07 

c4b8 

s 

59 

c4 

20 

lf 

c5 

cB 

4c 

ec 

0d 

C000 


aS 

cb 

c9 

40 

t0 

01 

60 

ad 

f 9 

c260 


f 4 

4c 

45 

c3 

ea 

ad 

91 

C0 

2B 

c4c0 

: 

c4 

c9 

01 

dB 

09 

ad 

25 

d0 

f 7 

C008 


00 

de 

aa 

a8 

29 

01 

fo 

la 

c9 

c26B 


c9 

ea 

d0 

03 

4c 

07 

C0 

4c 

d3 

c4cB 

3 

8d 

39 

c4 

4c 

el 

c4 

c9 

02 

2c 

C010 


8a 

29 

02 

f0 

26 

98 

29 

04 

al 

c270 


66 

C0 

a2 

00 

a9 

ea 

9d 

91 

6a 

c4d0 

3 

dB 

09 

ad 

27 

d0 

8d 

59 

c4 

dd 

C01B 


f0 

32 

ad 

00 

de 

aa 

29 

0B 

65 

C27B 


C0 

9d 

80 

C0 

eB 

e0 

03 

dB 

82 

c4d8 

3 

4c 

el 

c4 

ad 

26 


Bd 

59 

cd 

C020 


f0 

44 

8a 

29 

10 

f0 

59 

4c 

81 

C2B0 


f 5 

60 

a9 

4c 

a2 

07 

a0 

C0 

00 

c4e0 

3 

c4 

a9 

■0 

91 

f a 

c8 

91 

fa 

05 

C028 


00 

C0 

ad 

0f 

d0 

c9 

ld 

f0 

87 

C288 


Bd 

91 

C0 

Be 

92 

C0 

8c 

93 

68 

c4e8 

- 

20 

lf 

cb 

cö 

a9 

00 

Bd 

SB 

a4 

C030 


52 

38 

e9 

08 

38 

8d 

0f 

d0 

eB 

c290 


C0 

8d 

80 

C0 

8c 

82 

C0 

a2 

74 

c4f 0 

3 

c4 

a5 

02 

C0 

08 

d0 

ab 

e6 

a3 

C030 


4c 

83 

c 0 

ad 

0f 

d0 

c9 

bd 

46 

c29B 


94 

8e 

81 

C0 

60 

a2 

00 

bd 

82 

c4f 8 

: 

fc 

a9 

08 

18 

65 

fa 

85 

fa 

08 

C040 


f0 

41 

18 

69 

08 

18 

8d 

0f 

9a 

c2a0 


fc 

c0 

bc 

b2 

c2 

9d 

b2 

C2 

eb 

C500 

3 

a9 

00 

65 

fb 

85 

fb 

eB 

e0 

20 

C04B 


d0 

4c 

83 

C0 

ad 

0e 

d0 

c9 

59 

c2a8 


98 

9d 

fc 

C0 

e8 

e0 

02 

d0 

a5 

c508 

- 

03 

d0 

93 

a9 

10 

18 

65 

fa 

db 

C050 


00 

f0 

30 
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Listing 2. Maschinen-Routinen zu »Graphic Art«. Bitte beachten Sie die Eingabehinweise auf Seite 158. 
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LISTINGS 


Serienbriefe und Etiketten 

mit Master-Adress 



Jetzt wird die Textverarbeitung zum Software- 
Paket: Master-Adress ergänzt das beliebte Pro¬ 
gramm Master-Text zu einem integrierten System 
von Text- und Dateiverwaltung. Das Erstellen von 
Serienbriefen, Adreßetiketten und -listen wird da¬ 
mit nun zum Kinderspiel. 

M it hohen Leistungen hat Master-Text (Version 2.0 im 
64’er-Sonderheft 16) seine Benutzer davon über¬ 
zeugen können, wie komfortabel Textverarbeitung 
mit dem Computer sein kann. Selbstverständlich gestattet 
Master-Text auch das Erstellen von Rundschreiben oder 
Serienbriefen. Bei der Nutzung dieser Funktion war man je¬ 
doch bisher auf die Hilfe eines separaten Adreß- oder Datei¬ 
verwaltungsprogrammes angewiesen, mit dem die se¬ 
quentielle Datei für die einzelnen Anschriften erzeugt wur¬ 
de. Dies ist nun vorbei, denn Master-Adress bietet eine 
komfortable Ergänzung zu Master-Text, mit dem es eine 
Einheit bildet. Es erweitert Master-Text damit zu einem mo¬ 
dernen Software-Paket, vergleichbar etwa dem legendären 
Paar »Wordstar« und »Mailmerge«. 

Das professionelle Paar 


Über die Option »Rundschreiben« im Drucker-Menü und 
das Steuerzeichen »Axx« werden von Master-Text Daten 
aus einer sequentiellen Datei automatisch in den Ausdruck 
von Texten integriert. Die Nutzung dieser Funktion verlangt 
ein spezielles Dateiformat. Hier setzt Master-Adress an: Es 
bietet alle wichtigen Möglichkeiten, die für eine umfassen¬ 
de, auf Master-Text abgestimmte Adreßverwaltung nötig 


sind. Dazu zählen eine komfortable Benutzeroberfläche 
mit Pull-Down-Menüs und Windows, Bedienung mit Maus 
oder Joystick, DIN-Tastatur, Zeichensatz-Kompatibilität zu 
Master-Text sowie einfach zu handhabende aber leistungs¬ 
fähige Editier- und Seiektionsmöglichkeiten für Rund¬ 
schreibdateien. Die Verwaltung der Adressen erfolgt auf 
index-sequentieller Basis, wodurch ein rascher Zugriff so¬ 
wie eine hohe Datenkapazität (bis zu 512 Adressen pro Da¬ 
tei) gewährleistet sind. Durch ein übergeordnetes Verteiler¬ 
programm wird Master-Adress völlig zu einer System-Ein¬ 
heit mit Master-Text verbunden. 

Allgemeine Bedienung 


Die Benutzerführung von Master-Adress ist an Master-Text 
angepaßt, weist aber einige Erweiterungen auf, die jedoch 
keiner großen Umgewöhnung bedürfen. So ist es möglich, 
die Auswahl der einzelnen Menüpunkte vollständig auch 
mit einer an Port 2 angeschlossenen Maus beziehungs¬ 
weise mit einem Joystick vorzunehmen. Die herkömmli¬ 
che Tastatursteuerung mittels der Cursortasten und 

< RETURN > bleibt aber trotzdem erhalten. Ein Abbruch 
von gewählten Funktionen ist (wie bei Master-Text) mit 

< Fl >, zusätzlich aber auch mit einer Joystick- bzw. Maus¬ 
bewegung nach hinten möglich. Außerdem wird durch die 
Verwendung von Pull-Down-Menüs die Handhabung der 
Menüsteuerung sehr übersichtlich (Bild 1). Bei Disketten¬ 
operationen wird nur noch der Dateiname benötigt, alle 
übrigen Parameter, wie Suffix (= Endkennung) oder Lauf¬ 
werksnummer, werden automatisch beziehungsweise in 
einer residenten Installation vorgenommen, so daß die 
Bedienung des Programms noch leichter wird. 
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Bild 1. Master-Adress arbeitet mit Pull-Down-Menüs 


Legen Sie zum Start des Programmpakets die System¬ 
diskette (Eingabehinweise im Kasten beachten!) in das Dis¬ 
kettenlaufwerk Nummer 8. Zum Starten geben Sie ein: 

LOAD "0:! ",8: 

und drücken <SHIFT RUN/STOP>. Kurz darauf er¬ 
scheint das Auswahlmenü des Hauptverteilers. 

Das Hauptmenü 


Wie Sie in Bild 2 sehen, steht neben Master-Adress auch 
Master-Text aufrufbereit zur Verfügung. Sie brauchen die¬ 
se also nicht mehr umständlich suchen und laden, sondern 
nur noch einfach vom Hauptverteiler aus anwählen! Wenn 
Sie mit der <CURSOR-abwärts>-Taste und <RETURN > 
»Adressenverwaltung« ausgewählt haben, so wird Master- 
Adress geladen. Nach kurzer Zeit erscheint das Startbild, 
mit dem Sie begrüßt und um die Eingabe eines Dateina¬ 
mens gebeten werden. Legen Sie nach der Eingabe des 
Namens eine Datendiskette in das Laufwerk und drücken 
dann < RETURN >. Master-Adress überprüft daraufhin, 
ob die angegebene Datei auf der Diskette vorhanden ist. Ist 
das nicht der Fall, so wird die Funktion »Neu Eröffnen« aus¬ 
geführt, und Sie werden aufgefordert, eine neue Datei an¬ 
zulegen (siehe unten). Andernfalls wird die Datei geöffnet, 
und Sie gelangen in die Benutzeroberfläche von Master- 
Adress. Diese besteht aus folgenden Hauptmenü-Punkten, 
die nachfolgend im einzelnen erläutert werden: 

»EDIT«, »DATEI«, »EXPORT«, »INFO«, »ENDE«. 


dieses ausfüllen können (Bild 3). Mit den Tasten 
<RETURN> und <SHIFT RETURN> erreichen Sie je¬ 
weils das nächste beziehungsweise das vorherige Einga¬ 
befeld. Neben Feldern für Name, Anschrift und Telefon¬ 
nummer finden sich auch vier Felder für Bemerkungen. 
Hier sind beliebige Texte möglich. Sinnvoll wäre es zum 
Beispiel, Kategorien zu bilden, also etwa eine Unterschei¬ 
dung zwischen »Beruf«, »Schule«, »privat«, »Hobby« etc. 
Dies erleichtert das spätere Erstellen von Teillisten Ihres 
Adreßverzeichnisses. Haben Sie das letzte Feld ausgefüllt, 
so erscheinen in einer Fußleiste folgende Wahlmöglichkei¬ 
ten: 

»Nächste« - Eingabe einer weiteren Adresse 

»Korrektur« - Ändern der eben eingegebenen Adresse 

»Abbruch« - Verlassen der Eingabe ohne 

Speicherung der Daten 
»Ende«- Beenden der Eingabe. 

Bei den Punkten »Nächste« und »Ende« wird die einge¬ 
tragene Adresse auf Diskette gespeichert und anschlie¬ 
ßend im Programm fortgefahren. 

2. Datenpflege: 

Hier wird eine bestehende Datei überarbeitet, das heißt Sie 
können hier einerseits in der Datei vorwärts- und rückwärts¬ 
blättern (Menüpunkte »Weiter« und »Zurück«); Sie können 
aber auch Datensätze, also Adressen, ändern oder lö¬ 
schen. Gehen Sie besonders mit der letzten Option vor¬ 
sichtig um, denn ein gelöschter Datensatz wird natürlich 
auf der Diskette überschrieben. Er läßt sich also nicht mehr 




DT 


Anrede: ■Genosse. 

Hane ': Gorbatschow 

Hane Michail. 

Straße: Roter Platz 1 

Piz:.Ort: Moskau 

Tel : .✓ . 

Benerkung Ol . . 

Benerkung .. . 

Benerkung . .. 

Benerkung■04:. 




Bild 3. Das Adreßformular von Master-Adress 



Bild 2. Der Hauptverteiler des integrierten Programm- 
Pakets Master-Text/Master-Adress 


Befehle des »EDIT«-Menüs 

1. Erfassen: 

Wenn Sie diese Option im Pull-Down-Menü »Edit« anwäh¬ 
len, so erscheint ein leeres Adreßformular auf dem Bild¬ 
schirm, in dem Sie sich mit den Cursortasten bewegen und 


zurückholen. Der Punkt »Ende« führt Sie in das »Edit«- 
Menü zurück. 

3. Ordnen: 

Beim Zugriff auf einen Datensatz orientiert sich Master- 
Adress immer am Aufbau der Indexdatei, welche nach dem 
Feld »Name 1« geordnet ist. Mit der Option »Liste« wird die 
aktuelle Indexdatei auf dem Bildschirm angezeigt, wobei 
neben den Personennamen auch die Zugriffsnummer 
(»REC # «) des jeweiligen Datensatzes auf der Diskette an¬ 
gegeben wird. Besonders wichtig für Sie aber ist, daß Sie 
die Adreßliste alphabetisch sortieren können. Sie haben 
dabei die Wahl zwischen einer auf- und einer absteigenden 
Sortierrichtung (»A - Z« und »Z - A«), Der zum Sortieren ver¬ 
wendete Algorithmus ist das sogenannte »Shell-Metzner- 
Verfahren«, das zwar recht zügig arbeitet, aber bei länge¬ 
ren Dateien dennoch einige Sekunden benötigt. In der obe¬ 
ren Bildschirmleiste läßt sich der Ablauf des Sortiervorgan¬ 
ges verfolgen. Am Ende wird die neu sortierte Liste ausge¬ 
geben. 

4. Info: 

Dieser Menüpunkt informiert über Master-Adress. Die Ver- 
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sionsnummer, das Erstellungsdatum und der Autor des 
Programms werden ausgegeben. Weitere Funktionen sind 
nicht wählbar. 

Befehle des »DATEI«-Menüs 

1. Directory: 

Diese Option gibt das Inhaltsverzeichnis Ihrer Datendisket¬ 
te (siehe Installation) aus. Mit <CTRL> wird die Anzeige 
verlangsamt, mit < RUN/STOP> angehalten. 

2. Neu Eröffnen: 

Hiermit erfolgt die Eröffnung einer neuen Adreßdatei. Wird 
zu dem Zeitpunkt der Wahl dieser Funktion noch eine ande¬ 
re Datei bearbeitet, so wird diese automatisch geschlossen 
(siehe »Schließen«). Warten Sie also erst noch diesen 
Schließvorgang ab, bevor Sie eine neue Diskette in das Da¬ 
tenlaufwerk einlegen. 

Diskettenoperationen 

Das Programm fragt zunächst, ob die neue Diskette forma¬ 
tiert werden soll. Falls gewünscht, geben Sie hier einen Na¬ 
men (bis zu 16 Zeichen) und eine zweistellige ID-Kenn- 
zeichnung ein. Achtung: Alle Daten auf der Diskette werden 
durch das Formatieren gelöscht (Einzelheiten siehe 
Floppy-Handbuch)! Haben Sie bereits eine formatierte Dis¬ 
kette, übergehen Sie diesen Punkt durch Eingabe von 
< N > (für»nein«). Anschließend geben Sie den Namen der 
neuen Datei ein. Wenn Sie diese Funktion irrtümlich ge¬ 
wählt haben oder nun doch keine Datei anlegen wollen, so 
können Sie hier mit <F1 > oder der oben beschriebenen 
Mausbewegung abbrechen; das Programm startet darauf 
von neuem. Nach der Eingabe des Namens werden Sie ge¬ 
beten, die maximale Anzahl der Adressen für die Datei ein¬ 
zugeben. Master-Adress verwaltet bis zu 512 Adressen pro 
Datei, auch wenn diese Anzahl wohl selten in Anspruch ge¬ 
nommen werden dürfte. Bedenken Sie bei Ihrer Wahl, daß 
auch die nicht belegten (leeren) Adreßformulare auf der 
Diskette Platz benötigen, wählen Sie die Zahl aber eher et¬ 
was größer als zu klein, da eine nachträgliche Erweiterung 
nicht möglich ist. Ein Orientierungswert von 255 Adressen 
ist vorgegeben. 

Wenn Sie die Anzahl der benötigten Adressen eingege¬ 
ben haben, beginnt das Programm, die Datei auf der Dis¬ 
kette anzulegen. Dies dauert eine ganze Weile, ist aber ein 
einmaliger Vorgang. Nachdem auch die Indexdatei (für das 
Feld »Name 1«), die die Zugriffsordnung der einzelnen 
Adressen regelt, erzeugt worden ist, wird das Programm 
neu gestartet (siehe Programmstart). Der genaue Aufbau 
der index-sequentiellen Adreßdatei ist in Tabelle 1 und 2 
dargestellt. 

3. Schließen: 

Die Datei, die Sie gerade bearbeiten, wird geschlossen und 
das Indexfile mit allen Änderungen auf die Diskette ge¬ 
schrieben. Diese Funktion müssen Sie immer dann aufru- 
fen, wenn Sie nach der Arbeit mit einer Datei eine weitere 
(andere) Datei bearbeiten wollen. Automatisch wird diese 
Funktion auch ausgeführt, wenn Sie eine Funktion im »En- 
de«-Menü wählen, oder wenn Sie einen DOS-Befehl aus¬ 
führen. Am unteren Bildschirmrand erscheint dann jeweils 
die Meldung »Schreibe Index 

4. DOS-Befehle senden: 

Diese Funktion ermöglicht das Senden beliebiger DOS- 
oder Floppy-Befehle. Die Eingabe erfolgt in der gewohnten 
Syntax des Commodore-DOS der Floppy-Laufwerke, das 
heißt zum Löschen einer Datei 

"S0t: Dateiname" 

oder zum Validieren einer Diskette 

"V0t" 

Einzelheiten hierzu finden Sie in Ihrem Floppy-Handbuch. 


5. Installation: 

In diesem Menüpunkt werden die residenten Parameter für 
das DOS, also für die verwendeten Laufwerke sowie für die 
Einstellung der Bildschirmfarben geändert. Diese Parame¬ 
ter werden in der Systemdatei »INSTALL.SYS« abgelegt 
und beim Programmstart jeweils übernommen. Auf die Fra¬ 


Name: 

"Dateiname .rel" (REL) 

rec #1 

Feld A00 (Anrede) 

(String) 


Feld A01 (Name 1) 

(String) 

Länge 

229 Byte 

Feld A02 (Name 2) 

(String) 




Feld All (Bemerkung 04) 

(String) 


CR 

rec #2 

wie vorher 


rec #mx 

wie vorher 

Relative Datei DOS 2.6 (s. Floppy-Handbuch beziehungsweise 
Sekundärliteratur) 


Tabelle 1. Aufbau einer relativen Datei für Master-Adress 

ge nach dem Laufwerk geben Sie dessen Gerätenummer 
(Vorgabe: 08) ein. Es können ein oder zwei Laufwerke der 
Typ^n 1541,1541C, 1570/71 und Kompatible sowie Laufwer¬ 
ke tu i einem IEEE-488-Bus angesprochen werden. Bei den 
Bildschirmfarben für Rahmen, Hintergrund und Schrift 
sind die entsprechenden Farbcodes einzutragen, bei¬ 
spielsweise »6« für Blau, »0« für Schwarz und »15« für Hell¬ 
grau (siehe C64-Handbuch). 

Befehle des »Export«-Menüs 
Das index-sequentielle File-Format von Master-Adress 
eignet sich nicht direkt zur Weiterverarbeitung in Master- 


Name: 

"Dateiname .ind" (SEQ) 

Dateigröße mx 

4 Byte Dateigröße 
(String) 


1 Byte CR 

Index 1 

4 Byte rec # 

Zeiger auf Datensatz 


24 Byte Schlüssel 
(String) ("Name 1") 


1 Byte CR 

Index 2 

wie vorher 


Index mx 

wie vorher 

Cnd r\i filo 



Tabelle 2: Aufbau der Indexdatei für Master-Adress 

Text. Vielmehr müssen hierfür gesonderte sequentielle Fi¬ 
les erzeugt, die gewünschten Datensätze also gewisser¬ 
maßen exportiert werden. Dieses Herausfiltern von Adres¬ 
sen aus Ihren Dateien nach bestimmten Kriterien zur Nut¬ 
zung in Master-Text geschieht in diesem Menübereich. Ne¬ 
ben Serienbriefen beziehungsweise Rundschreiben kön- 




SONDERHEFT 26 


85 




























LISTINGS 


C64 


nen hiermit auch Etiketten, Adreßlisten, Telefonverzeich¬ 
nisse oder ähnliches gestaltet werden. In diesem Unterme¬ 
nü stehen folgende Optionen zur Verfügung: 

Serienbriefe, Etiketten, Adreßnufkleber - 
alles ist möglich 


1. Rundschreiben: 

Nach Anwahl dieses Menüpunktes erscheint ein Fenster, 
in dem die Namen von neun verschiedenen Datenfeldern 
Ihrer Adreßdatei aufgelistet sind. Sie müssen hier festle¬ 
gen, welches Feld (Anrede, Name, Postleitzahl etc.) als 
Unterscheidungs-Kriterium, das heißt als Schüssel für die 



l!EB3BExportl 

Selektion: 

n:. 



ftr 


hreiben 







Name 1. 

ruck••• 




N 





l U 

Inhalt:-801 

IM , , , 



. 



T 



Bemerkung 01 





Bemerkung - 02 





Bemerkung 03 





Bemerkung 04 



Bild 4. Die Selektion von Adressen für Rundschreiben 
erfolgt in übersichtlicher Window-Technik 

Selektion der zu exportierenden Adressen dienen soll. 
Wählen Sie hierzu einfach mit den Cursortasten und 
< RETURN > den entsprechenden Punkt im dargestellten 
Fenster an. Hierauf müssen Sie noch den Inhalt der Selek¬ 
tion, also das Auswahlkriterium an sich, festlegen. Master- 
Adress sucht dann alle Datensätze, die diesem Kriterium 
entsprechen, heraus und schreibt sie in eine eigene Datei. 
Wenn Sie also den Schlüssel »Postleitzahl« gewählt haben, 
könnten Sie beispielsweise alle Adressen in München aus¬ 
sondern, indem Sie einfach »8« als Inhalt eintragen (Bild 4), 
denn »8000« ist Postleitzahl-Bereich von München. Der Se¬ 
lektionsinhalt kann aber bis zu sechs Stellen betragen. Bei 
Eingabe der Postleitzahl »8013«, sucht das Programm folg¬ 
lich nur die gespeicherten Adressen in Haar bei München 
heraus. Vor dem eigentlichen Start dieses Programmteils 
müssen Sie noch einen Dateinamen für die Master-Text- 
Rundschreibdatei eingeben. Das von Master-Text für sol¬ 
che Dateien benötigte Suffix »r« als 16. Buchstabe des File¬ 
namens wird dabei automatisch ergänzt. Anschließend er¬ 
folgt die Selektion der Datensätze sowie das Erstellen der 
Datei im Master-Text-Format (Tabelle 3) auf der Diskette. 

2. Ansehen: 

Diese Option funktioniert genau wie der vorhergehende 
Punkt »Rundschreiben«, es wird aber keine Datei erstellt, 
sondern die ausgewählten Adressen werden nacheinan¬ 
der einzeln auf dem Bildschirm ausgegeben. Auf Tasten¬ 
druck erscheint dabei die jeweils nächste Adresse. Dies ist 
beispielsweise dann sinnvoll, wenn Sie sich zunächst ver¬ 
gewissern wollen, welche Personen dem jeweiligen Kriteri¬ 
um entsprechen. Gegebenenfalls können Sie dann Ihre Se¬ 
lektion für die Rundschreibdatei noch weiter präzisieren. 

3. Info.Druck: 

Hier wird als Hilfstext eine Kurzanleitung für die Ausgabe 
von Listen mit Master-Text auf dem Drucker angezeigt. Ge¬ 
naueres finden Sie weiter unten. < 


Die »INFO«-Tafel 

Sie erhalten bei diesem Menüpunkt Angaben über die 
derzeitige Datei und die gewählte Installation. Die genann¬ 
te Dateigröße haben Sie zuvor beim Eröffnen der Datei fest¬ 
gelegt. Die Installationsdaten können Sie mit dem Punkt 
»Installation« im Datei-Menü ändern. 

Das »ENDE«-Menü 

Hiermit verlassen Sie den Arbeitsbereich von Master- 
Adress. Mit der Option »Master-Text« können Sie den 
Hauptverteiler aufrufen, von dem aus Sie Master-Text di¬ 
rekt starten können (es sollte sich also auf der gleichen Dis¬ 
kette befinden - siehe Eingabehinweise). Dateien, die im 
Moment geöffnet sind, werden zuvor geschlossen. Die Op¬ 
tion »Basic« führt einen Systemreset aus und springt in den 
Basic-Interpreter. Mit »Zurück« gelangen Sie wieder in den 
vorherigen Menüpunkt, also in die »lnfo«-Tafel. 
Rundschreiben und Etiketten mit Master-Text 

Um Rundschreiben oder Etiketten zu drucken, müssen 
Sie zunächst mit Master-Adress eine Rundschreibdatei er¬ 
stellen (siehe oben). Rufen Sie anschließend über das Me¬ 
nü »Ende« und die Option »Master-Text« die Textverarbei¬ 
tung auf. In Ihrem Rundschreiben benutzen Sie dann für 
Adreßdaten das Steuerzeichen < F7> (es erscheint ein re- 
verses »S« als Kennzeichen für folgende Steuercodes) ge¬ 
folgt von »Axx«. 

So werden Rundschreiben erstellt 


Die Variable »xx« ist hierbei die Nummer des jeweiligen Fel¬ 
des in der Eingabemaske von Master-Adress (also »A00« 
für »Anrede«, »A01« für »Name 1« etc. bis »All« für »Bemer¬ 
kung 4«), Für die Erstellung von Etiketten legen Sie sich bit¬ 
te mit Mas'er-Text einen Text und ein Formular an, mit deren 
Hilfe die Mdreßdaten ausgedruckt werden können. Auf der 
Programmservice-Diskette sind entsprechende Beispiele 
solcher Files schon enthalten. Hierbei müssen Sie even¬ 
tuell noch das Formular Ihren Wünschen anpassen. Alles 


Name: 

'Dateiname r" (SEQ) 

Adresse 1 

Feld A00 (Anrede) 

(String) Ende: CR 

Länge je 
nach Text 

Feld A01 (Name 1) 

(String) Ende: CR 

Feld A02 (Name 2) 

(String) Ende: CR 




Feld All (Bemerkung 04) 

(String) Ende: CR 

Adresse 2 

wie vorher 


Adresse n 

wie vorher 

Endsatz 

12 x CR 

FnH nf filo 


Tabelle 3: Aufbau einer Rundschreib-Datei für Master-Text 


weitere entnehmen Sie bitte der Anleitung zu Master-Text. 
Wenn Sie Rundschreiben drucken, müssen Sie bei »An¬ 
zahl der Daten« den Wert »12« eintragen (12 Felder »A00« 
bis »All«). 

Mit der Adreßverwaltung »Master-Adress« hat also Ma¬ 
ster-Text einen überaus starken Partner erhalten. Als inte¬ 
griertes Programmpaket bilden beide eine Einheit, die 
auch professionellen Ansprüchen gerecht wird. 

(Carsten Kipping/Dr. Rudolf Egg/sk) 
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So geben Sie Master-Adress ein und verbinden es mit Master-Text. 


Bitte befolgen Sie die Eingabehinweise genau, 

1. Vorbereitung: 

Legen Sie zunächst eine neue Diskette in das Diskettenlaufwerk 
und formatieren Sie diese mit der Befehlssequenz 
OPEN 1,8,15,"n0:text+/adress+,00":CL0SE 1. 

Legen Sie außerdem eine Diskette mit allen Dateien von Master- 
Text bereit. 

2. Eingabe Basic-Teil: 

Geben Sie mit dem Checksummer V 3 (Seite 158) das Hauptver¬ 
teilerprogramm »I« (Listing 1) ein und speichern Sie es als erste 
Datei auf Ihrer neuen Systemdiskette. Geben Sie anschließend 
das Programm »INSTALL-GEN“ (Listing 2) ein und speichern Sie 
es ebenfalls. 

3. Eingabe Maschinenteil: 

Geben Sie nun mit dem MSE (Seite 158) die beiden Dateien 
»ADRESSEN/COOO" und »ADRESSEN« (Listing 3 und 4) ein und 
speichern Sie auch diese auf der Systemdiskette. 

4. Erstellen des lauffähigen Systems: 

Hierzu laden Sie zunächst bitte das Programm »INSTALL-GEN« 
und starten es mit »RUN«. Es erzeugt die Datei »INSTALL.SYS« mit 
den residenten Parametern für Master-Adress. Diese Daten kön¬ 
nen Sie von Master-Adress aus jederzeit ändern (siehe Anleitung). 


Anschließend müssen Sie noch alle Dateien von Ihrer »alten« 
Master-Text-Diskette auf die neue Systemdiskette kopieren. Hier¬ 
mit sind Master-Text und Master-Adress fest verbunden. 

5. Änderungen bei Master-Text: 

Laden Sie das Teil-Programm »LADER« von Master-Text und ge¬ 
ben Sie folgende Zelle ein: 

95 POKE 49974,16*1+0:POKE 45892,11:P0KE 45902, 

0:POKE 47431,11:POKE 47441,0 
Speichern Sie das Programm wieder und laden Sie »INSTALL«: 
10000 POKE 53265, 11: POKE 53281, 0: 

POKE 53280,0: PRINT "[CLR)(CTRL-Nj[CTRL-H](CBM-5)" J 
Noch ein Hinweis: Master-Adress selbst kann keinen Drucker 
ansprechen. Wollen Sie Datensätze ausdrucken, so rufen Sie mit 
der Option »Master-Text« im Menü »Ende« die Textverarbeitung auf 
und können dann sehr komfortabel die mit »Export« erzeugten 
Rundschreibdateien als Listen, Briefe oder Etiketten ausdrucken. 
Auch ein veränderter Zeichensatz von Master-Text (beispielsweise 
Tausch von »Y« und »Z«) ist verfügbar, da auch Master-Adress die 
Datei »ZEICHENSATZ« benutzt. Als Einschränkung gilt jedoch, 
daß in der Adreßverwaltung die Grafikzeichen (über die 
<CBM >-Taste) nicht ansprechbar sind. 


1000 

1005 

1010 

1015 

1020 

1025 

1030 

1035 

1040 

1045 

1050 

1055 

1060 


1065 

1070 

1075 

1080 

1085 

1090 

1095 

1100 

1105 

1110 

1115 

1120 

,1125 

1130 

1135 

1140 

1145 

1150 

1155 

1160 

1165 

1170 



REM HAUPTVERTEILER 
REM FUER 'MASTER-TEXT/ADRESS' 

REM 1987 VON CARSTEN KIPPING 

REM 'MASTER-TEXT' VON M. PAHL 

REM 'MASTER-ADRESS' VON C. KIPPING 

POKE 1,7:POKE 808,237 
IF WW=2 THEN WW=5: LOAD"0:ADRE5SEN/C00 
0 ", 8,1 

IF WW=5 THEN WW=2:SYS(828):GOTO 1180 
POKE 53281,00:POKE 53280,00:PRINT"<CL 
R,CTRL—N,CTRL—H,BREY 2>”; 

PRINT" tRVSnN) B***»***»»*»************ 

PRINT"-{RVOFF,WHITE, 

X & aa 

PRINT" 

REM KOPIERROUTINE *7000-58000 -> *E00 
0-5F000 LESEN 

FOR 1=828 TO 855:READ X:POKE I,X:NEXT 
I 

PRINT"<GREY 2,2D0WN>"SPC(5)"SITTE WAE 
HLEN SIE EINE SPTION:" 

WW=0 

PRINT"{HOME,9D0WN>“ 

PRINT SPC(11)"2EXTVERARBEITUNG" 

PRINT SPC(10)"<DOWNJflDRESSENVERWALTUN 
G" 

PRINT SPC(9)"<D0WN>JNSTALLATI0N ÜRUCK 
ER" 

PRINT SPC(15)"<DOWN>SEENDEN" 

IF WW>4 THEN WW=4 
IF WW<1 THEN WW=1 
PR I NT " {HOME, 10DOWN, RVSON > " -, 

IF WW=1 THEN PRINT SPC(11)"IEXTVERARB 
EITUNG" 

IF WW=2 THEN PRINT SPC<10)"{2D0WNJADR 
ESSENVERWALTUNG" 

IF WW=3 THEN PRINT SPC(9)"{4D0WNJJNST 
ALLATION 2RUCKER" 

IF WW=4 THEN PRINT SPC(15)“{6D0WNJSEE 
NDEN " 

POKE 198,0:WAIT 19B,1:GET WW* 

IF WW*=." {DOWN VOR WW*=" "THEN WW=WW+1 
:GOTO 1090 

IF WW*="{UPVOR WW*="{SHIFT—SPACE>"TH 
EN WW=WW—1:GOTO 1090 
IF WW*OCHR*<13)THEN 1150 
IF WW=1 THEN DN*="LADER" 


< 185> 

< 126> 

< 136> 
<229> 
<252> 
<217> 
<246> 
<042> 

<031> r 

<089> 


<058> 

< 141 > 

< 154> 

< 156> 

< 104> 

<176> 

<232> 

<070> 

< 178> 

< 026 > 

<207> 

< 204 > 
<242> 

< 108> 
<084> 

< 001 > 

<124> 

<173> 

<255> 


1175 IF WW=2 THEN DN*="ADRESSEN":GOSUB 121 
5:LOAD"0:ZEICHENSATZ",8,1 
1180 IF WW=3 THEN DN*="INSTALL" 

1185 IF WW=4 THEN SYS 64738 
1190 PRINT"{HOME,19D0WN,BLACK>LOAD"CHR*(34 
)"0:"DN*;CHR*(34)",8,1" 

1195 PRINT"{4D0WN>?"CHR* <34>"{CLR>"CHR*(34 
> “:RUN{7UPV; 

1201PI OPEN 1,8,15, "10": CLOSE 1 

1223 POKE 631,13:POKE 632,13:P0KE 198,2 

1210 END 

1215 PRINT" {CLR, CTRL-N,CTRL-H,GREY 2V; 

1220 PR I NT 11 {RVSON } W**>*-*_*-*-*-»*-******»****** 
********#***+**• £:•' ■ 

1225 PRINT"—{RVOFF,WHITE,5SPACEI+ H fl{SHIF 
T-SPACE > £{SHIFT-SPACE JXISHIFT-SPACE)£ 
{SHIFT—SPACE}£{SHIFT-SPACE >-{SHIFT-SP 
ACEJfi £ R. £ S S. + {4SPACE,GREY 2,RVS0N 
>="; 

1230 PRINT" 7<HHHnnnmnm»nt«Hnnnnnnmi«ni» 
■**A*.**.*.«:? {RVOFF > " 

1235 PRINT“ {GREY 2.2D0WN. 3SPACE > W***«»**** 

1240 PRINT"{3SPACE) = HRITTEN 1987 BY £ARST 
EN JS.IPPING = 

1245 PRINT" {3SPACE> = {3SPACEXC> 1987 flARKT 
UND XECHNIK{4SPACE> = 

1250 PRINT"{3SPACE> = {33SPACE> = " 

1255 PRINT"{3SPACE>-{6SPACE}************** 
*******{6SPACE> = " 

1260 PRINT"{3SPACE> = {6SPACE>* BARSTEN K.IPP 
ING{3SPACE> *{6SPACE > 3 " 

1265 PRINT"{3SPACE> = {6SPACE>* HINTERSTRASS 
E 40{2SPACE>*{6SPACE> = " 

1270 PRINT"{3SPACE) = {6SPACE>* 3050 BJNSTOR 
F 1{3SPACE >*{6SPACE " 

1275 PRINT"{3SPACE) = {6SPACE>* XEL.: 05031/ 
71693 *{6SPACE>3" 

1280 PRINT"{3SPACE> = {6SPACE)************** 
*******{6SPACE > = " 

1285 PRINT" {3SPACE>3{33SPACE>c;" 

■*.*A» *■*».».».*■*.Y ‘' 

1295 RETURN 
1300 : 

1305 DATA 169,0,160,112,133,95,132,96,169, 
0,160,128,133,90,132,91,169,0,160 
1310 DATA 240,133,8B,132,89,32,191,163,96 


< 197> 
<013> 
<009> 

<219> 

<069> 

<224> 

<230> 

<196> 

<030> 

<072> 


<025> 

< 101 > 

<054> 

<236> 

<0BB> 

< 129> 

<039> 

< 161 > 

<058> 

<055> 

<230> 

<066> 
< 166> 

<245> 

<0B3> 

<006> 

<162> 

<207> 


Listing 1. •>!« Der Hauptverteiler für das integrierte Paket 
von Master-Adress und Master-Text. Bitte mit dem 
Checksummer (Seite 158) eingeben. 
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1000 REM HILFSPROGRAMM ZUR ERZEUGUNB <188> 
1010 REM DER DATEI 'INSTALL.SYS' <128> 
1020 REM FUER 'MASTER-ADRESS 2.0' <1B5> 
1030 : <246> 
1040 REM AUTOR: CARSTEN KIPPINB <151> 
1050 : <010> 
1060 OPEN 1,8,1,"00:1NSTALL{5SPACE}.SYS, S, 

W" , < 171» 
1070 READ IS:IF IS=255 THEN 1100 <132> 
1080 PRINT#1,IS <234» 
1090 GOTO 1070 <238 > 


1100 

CLOSE 1 

<095» 

1110 

: 

<070» 

1120 

DATA 8,4,7,0,0,12 

<086 > 

1130 

DATA 255 

< 010 :- 


Listing 2. »INSTALL-GEN« dient zum Erzeugen der 
Datei »INSTALL-SYS« mit den residenten Parametern 
von Master-Adress. Bitte mit dem Checksummer 
(Seite 158) eingeben. 


Name 

adressen/cOOO 


cOOO cleO 

cOaO 

fb 

88 

dO 

e9 

a6 

fc 

20 

cd 

bf 

cl50 : 

de 

29 

02 

c9 

00 

dO 

05 

a9 

69 











c0a8 

bd 

a9 

20 

20 

d2 

ff 

20 

ed 

cf 

cl58 : 

11 

4c 

83 

cl 

ad 

00 

de 

29 

49 

cOOO 

4c 

37 

cO 

4c 

15 

cU 

4c 

62 

ef 

cObO 

f 6 

fO 

19 

20 

a5 

ff 

a6 

90 

7f 

cl60 : 

04 

c9 

00 

dO 

05 

a9 

9d 

4c 

10 

cOOB 

cO 

4c 

dO 

cO 

4c 

d3 

cO 

4c 

39 

c0b8 

dO 

12 

aa 

fO 

06 

20 

d2 

ff 

07 

cl68 : 

83 

cl 

ad 

00 

de 

29 

08 

c9 

02 

cOlO 

8d 

cl 

4c 

Od 

cl 

a9 

Oa 

8d 

df 

cOcO 

4c 

b3 

cO 

a9 

Od 

20 

d2 

ff 

68 

cl70 : 

00 

dO 

05 

a9 

ld 

4c 

83 

cl 

15 

c018 

04 

d4 

u9 

08 

8d 

05 

d4 

8d 

61 

c0c8 

aO 

02 

dO 

cl 

20 

42 

f 6 

60 

86 

cl78 : 

ad 

00 

de 

29 

10 

c9 

00 

dO 

73 

c020 

06 

d4 

a9 

3b 

8d 

00 

d4 

a9 

e2 

cOdO 

18 

90 

03 

38 

bO 

00 

a9 

00 

aa 

cl 80 : 

09 

a9 

Od 

a6 

c6 

9d 

77 

02 

bl 

c 028 

8b 

8d 

01 

d4 

a9 

21 

8d 

04 

37 

c0d8 

2a 

85 

a9 

20 

fe 

cO 

85 

a8 

91 

cl88 : 

b6 

c6 

4c 

31 

ea 

20 

9e 

b7 

a4 

c030 

d4 

a9 

ff 

8d 

18 

d-1 

60 

20 

74 

cOeO 

a5 

64 

85 

a7 

20 

fd 

ae 

20 

fb 

cl90 : 

86 

fb 

20 

fd 

ae 

20 

8b 

bO 

57 

c038 

47 

cO 

18 

20 

fO 

ff 

20 

fd 

75 

c0e8 

fe 

cO 

aO 

02 

bl 

64 

aa 

a5 

e3 

cl98 : 

a6 

fb 

20 

c6 

ff 

a9 

eO 

85 

f9 

c040 

ae 

20 

aO 

aa 

4c 

ae 

a7 

20 

95 

cOfO 

a9 

dO 

04 

bl 

a7 

91 

64 

8a 

e6 

claO : 

fc 

a9 

cl 

85 

fd 

aO 

00 

20 

b7 

c048 

9e 

b7 

eO 

19 

bO 

ii 

86 

02 

cf 

cOf 8 

91 

a7 

88 

10 

ef 

60 

20 

9e 

41 

cla8 : 

cf 

ff 

c9 

Od 

fO 

07 

99 

eO 

fa 

c050 

20 

fd 

ae 

20 

9e 

b7 

eO 

28 

9a 

clOO 

ad 

24 

Od 

10 

05 

a5 

65 

fO 

fa 

clbO : 

cl 

c8 

4c 

a7 

cl 

84 

fb 

a5 

59 

c058 

bO 

05 

8a 

a8 

aß 

02 

60 

4c 

d7 

cl08 

01 

60 

4c 

99 

ad 

ea 

ad 

14 

91 

clb8 : 

33 

38 

e5 

fb 

bO 

02 

c6 

34 

9f 

c060 

48 

b2 

a9 

24 

85 

fb 

a9 

fb 

c7 

cllO 

03 

ac 

15 

03 

8d 

8b 

cl 

8c 

64 

clcO : 

bl 

fc 

91 

33 

88 

cO 

ff 

dO 

ea 

c068 

85 

bb 

a9 

00 

85 

bc 

a9 

01 

lc 

cll8 

8c 

cl 

a9 

2a 

aO 

cl 

8d 

14 

ab 

clc8 : 

f7 

c8 

a5 

fb 

91 

47 

c8 

a5 


c070 

85 

b7 

a9 

08 

85 

ba 

a9 

60 

d2 

cl20 

03 

8c 

15 

03 

a9 

60 

8d 

Od 

fd 

cldO : 

33 

91 

47 

c8 

a5 

34 

91 

47 

88 

c078 

85 

b9 

20 

d5 

f 3 

a5 

ba 

20 

34 

C128 

cl 

60 

ce 

fb 

03 

fO 

03 

4c 

a9 

cld8 : 

20 

cc 

ff 

a9 

00 

85 

13 

60 


c080 

b4 

ff 

a5 

b9 

20 

96 

ff 

a9 

de 

cl30 

8a 

cl 

a9 

06 

8d 

fb 

03 

a6 

d8 











c088 

00 

85 

90 

aO 

03 

84 

fb 

20 

07 

cl38 

c6 

eO 

08 

90 

03 

4c 

8a 

cl 

c3 











c090 

a5 

ff 

85 

fc 

a4 

90 

dO 

34 

bO 

cl40 

ad 

00 

de 

29 

01 

c9 

00 

dO 

4a 

Listing 3. 

»ADRESSEN/COOO 

». Bitte 

c098 

20 

a5 

ff 

a4 

90 

dO 

2d 

a4 

ad 

cl48 

05 

a9 

91 

4c 

83 

cl 

ad 

00 

Od 

mit dem MSE (Seite 158) eingeben. 


anuna«*' 


Name : 

adressen 




0801 4106 

0961 

ee 

Jl 

ae 

Oc 

bl 

Oc 

la 

13 

Of 

Oadl : 

7f 

25 

6a 

85 

6a 

a9 

69 

aO 

09 











0969 

55 

13 

55 

13 

25 

13 

dO 

13 

54 

0ad9 : 

00 

20 

5b 

bc 

18 

aa 


dO 

74 

0801 : 

Of 

08 

c3 

07 

He 

28 

32 

30 

3a 

0971 

25 

13 

25 

13 

55 

13 

55 

13 

35 

Oael : 

01 

38 

8a 

2a 

10 

dd 

cO 

Oa 

ed 

0809 : 

36 

35 

29 

00 

00 

OO 

00 

00 

24 

0979 

05 

13 

Oe 

13 

08 

13 

11 

13 

71 

0ae9 : 

90 

58 

cO 

Oc 

bO 

76 

8a 

10 

60 

0811 : 

a2 

bO 

bd 

21 

08 

9d 

00 

01 

Oe 

0981 

d9 

16 

de 

16 

da 

16 

46 

17 

85 

Oaf 1 : 

2f 

aO 

00 

84 

69 

84 

6a 

84 

6e 

0819 : 

ca 

eO 

ff 

dO 

f 5 

-4c 

00 

01 

31 

0989 

fa 

12 

7b 

17 

7b 

17 

7b 

17 

db 

0af9 : 

6b 

84 

6e 

a2 

90 

20 

fa 

Oa 

aO 

0821 : 

ad 

ac 

01 

85 

f 7 

ad 

ad 

Ol 

bb 

0991 

7e 

17 

7b 

17 

7b 

17 

7b 

17 

e9 

ObOl : 

a5 

6c 

dO 

08 

a2 

88 

a5 

6d 

fl 

0829 : 

85 

f 8 

78 

a9 

34 

85 

01 

aO 

32 

0999 

7b 

17 

7b 

17 

7b 

17 

7b 

17 

ee 

0b09 : 

fO 

16 

84 

6d 

30 

06 

ca 

06 

3e 

0831 : 

00 

a5 

n 

dO 

02 

c6 

f 8 

c6 

e3 

09al 

78 

17 

7b 

17 

7b 

17 

81 

17 

Ob 

Obll : 

6d 

2a 

10 

fS 

65 

6a 

a5 

6d 

14 

0839 : 

f7 

a5 

ae 

dO 

02 

c6 

af 

c6 

6b 

09a9 

27 

03 

00 

00 

10 

e8 

64 

Oa 

40 

Obi 9 : 

85 

6b 

86 

69 

84 

6c 

84 

6d 

bb 

0841 : 

ae 

a5 

ae 

c9 

dl 

a5 

af 

e9 

83 

09bl 

6a 

53 

2b 

12 

7b 

b8 

b8 

ba 

a8 

0b21 : 

a5 

Oe 

10 

03 

20 

85 

10 

a4 


0849 : 

08 

90 

15 

bl 

ae 

91 

f? 

18 

9c 

09b9 

bb 

bf 

aO 

01 

2c 

aO 

02 

a9 

bf 

0b29 : 

3c 

cO 

07 

90 

aO 

b9 

e9 

08 

29 

0851 : 

90 

df 

e6 

f7 

dO 

02 

e6 

f8 

34 

09cl 

20 

24 

64 

10 

05 

20 

72 

Oc 

42 

0b31 : 

85 

55 

b9 

ee 

06 

85 

56 

a5 

fe 

0859 : 

60 

eb 

f 9 

dO 

02 

c6 

fa 

60 

c9 

09c9 

a9 

2d 

99 

fe 

00 

84 

71 

a2 

7e 

0b39 : 

6e 

45 

66 

85 

6f 

a5 

61 

6c 

17 

0861 : 

a9 

01 

aO 

08 

85 

f 9 

84 

fa 

e4 

09dl 

00 

86 

62 

a5 

64 

dO 

06 

a5 

92 

0b41 : 

55 

00 

e4 

Oe 

dO 

12 

8a 

10 

79 

0869 : 

aO 

00 

20 

32 

01 

a5 

f7 

cd 

10 

09d9 

65 

fO 

46 

a2 

02 

bd 

e8 

08 

5e 

0b49 : 

de 

a5 

3c 

c9 

07 

bO 

06 

20 

90 

0871 : 

ac 

01 

a5 

f 8 

ed 

ad 

01 

bO 

d8 

09el 

85 

22 

bd 

ec 

08 

85 

23 

aO 

ff 

ObSl : 

13 

Ob 

4c 

lc 

Oa 

4c 

c5 

Ob 

bl 

0879 : 

2a 

bl 

f 7 

cd 

af 

01 

fO 

08 

Oa 

09e9 

ff 

38 

c8 

a5 

65 

e5 

23 

85 

08 

0b59 : 

8a 

10 

c5 

20 

ae 

Of 


Oe 

77 

0881 : 

91 

f 9 

20 

39 

01 

18 

90 

e2 

17 

09f 1 

65 

a5 

64 

e5 

22 

85 

64 

bO 

40 

0b61 : 

10 

8f 

30 

e5 

8a 

30 

03 

20 

78 

0889 : 

20 

32 

01 

bl 

f7 

85 

ff 

20 

25 

09f9 

fl 

a5 

65 

65 

23 

85 

65 

a5 

02 

0b69 : 

ce 

Oa 

a5 

Oe 

30 

03 

20 

lb 

39 

0891 : 

32 

01 

bl 

f 7 

85 

04 

a5 

ff 

be 

OaOl 

64 

65 

22 

85 

64 

a5 

62 

dO 

fO 

0b71 : 

10 

46 

3c 

bO 

Oc 

a5 


25 

b3 

0899 : 

91 

f9 

20 

39 

01 

c6 

04 

dO 

4e 

0a09 

05 

98 

fO 

Oc 

e6 

62 

98 

09 

Oe 

0b79 : 

64 

85 

64 

a5 

6d 

25 

65 

90 

24 

08al : 

f 5 

fO 

c7 

a5 

f 9 

a4 

fa 

85 

71 

Oall 

30 

a4 

71 

99 

ff 

00 

e6 

71 

al 

0b81 : 

Oa 

a5 

6c 

05 

64 

85 

64 

a5 

69 

08a9 : 

2d 

84 

2e 

85 

ae 

84 

af 

a9 

76 

0al9 

e8 

eO 

04 

90 

cO 

a4 

71 

a5 

c7 

0b89 : 

6d 

05 

65 

85 

65 

80 

a5 

69 

46 

08bl : 

37 

bb 

01 

58 

20 

33 

a5 

a2 

6e 

0a21 

65 

09 

30 

4c 

04 

bf 

a5 

Oe 

91 

0b91 : 

30 

06 

a9 

00 

85 

6b 

fO 

11* 

c8 

08b9 : 

05 

86 

c6 

bd 

a6 

01 

9d 

76 

40 

0a29 

10 

06 

20 

72 

Oc 

4c 

be 

Oc 

c9 

0b99 : 

38 

e9 

90 

30 

03 

4c 

48 

b2 

09 

08cl : 

02 

ca 

dO 

f 7 

6c 

02 

03 

93 

65 

0a31 

20 

b4 

bf 

4c 

be 

Oc 

a5 

Oe 

24 

Obal : 

aa 

a5 

6a 

4a 

66 

6b 

e8 

dO 

09 

08c9 : 

52 

55 

4e 

Od 

00 

cO 

00 

al 

44 

Oa39 

30 

03 

20 

lb 

10 

a5 

64 

49 

a9 

0ba9 : 

fa 

06 

6a 

90 

02 

49 

ff 

85 

c9 

08dl : 

Ob 

08 

01 

00 

9e 

32 

30 

37 

cb 

Oa41 

ff 

85 

64 

a5 

65 

49 

ff 

85 

7c 

Obbl : 

6c 

a5 

6b 

90 

02 

49 

ff 

85 

52 

08d9 : 

36 

al 

00 

12 

4c 

41 

Ob 

4c 

b6 

0a49 

65 

4c 

be 

Oc 

aO 

00 

bl 

6f 

b5 

0bb9 : 

6d 

60 

a5 

6c 

10 

14 

85 

6e 

e2 

08el : 

b5 

Oc 

66 

09 

76 

09 

3b 

16 

20 

0a51 

18 

71 

64 

90 

03 

4c 

58 

b6 

ae 

Obel : 

a5 

6c 

49 

ff 

85 

6c 

a5 

6d 

lc 

08e9 : 

24 

14 

17 

14 

cO 

14 

c3 

14 

44 

0a59 

20 

75 

b4 

20 

7a 

b6 

a4 

51 

f 8 

0bc9 : 

49 

ff 

85 

6d 

e6 

6d 

dO 

02 

42 

08f 1 : 

32 

Ob 

55 

Ob 

ee 

11 

15 

12 

50 

0a61 

dO 

05 

a5 

50 

20 

db 

b6 

aO 

24 

Obdl : 

e6 

6c 

60 

a2 

00 

a5 

6a 

c5 

c4 

08f9 : 

73 

15 

68 

15 

48 

15 

48 

15 

ac 

0a69 

02 

bl 

50 

85 

23 

88 

bl 

50 

e6 

0bd9 : 

64 

dO 

06 

a5 

6d 

c5 

65 

fO 

58 

0901 : 

80 

15 

4f 

Ob 

a9 

15 

ff 

10 

a4 

Oa71 

85 

22 

88 

bl 

50 

20 

8c 

b6 

05 

Obel : 

Ob 

ca 

a5 

6c 

45 

64 

30 

06 

8c 

0909 : 

ee 

10 

de 

10 

cd 

10 

cd 

10 

ed 

0a79 

a4 

70 

dO 

05 

a5 

6f 

20 

db 

38 

0be9 : 

bO 

02 

a2 

01 

8a 

60 

bO 

fa 

c7 

0911 : 

26 

11 

cd 

10 

cd 

10 

cd 

10 

ea 

0a81 

b6 

4c 

ca 

b4 

cO 

07 

bO 

c4 

37 

Obf 1 : 

90 

fa 

20 

60 

Ob 

a5 

39 

85 

eO 

0919 : 

cd 

10 

cd 

10 

cd 

10 

cd 

10 

18 

0a89 

a4 

65 

dO 

03 

20 

b4 

Ob 

a5 

93 

Obf 9 : 

50 

a5 

3a 

85 

51 

aO 

06 

dO 

2f 

0921 : 

cd 

10 

le 

11 

2d 

11 

33 

11 

ea 

0a91 

6f 

a4 

70 

20 

aa 

b6 

86 

6c 

c6 

OcOl : 

05 

20 

96 

Ob 

aO 

Oa 

b9 

84 

68 

0929 : 

cd 

10 

cl 

10 

47 

11 

c2 

11 

9b 

0a99 

84 

6d 

aO 

02 

aa 

38 

e5 

61 

03 

0c09 : 

17 

be 

85 

17 

4c 

79 

15 

20 

e9 

0931 : 

c2 

11 

ba 

11 

c2 

15 

f 5 

15 

23 

Oaal 

fO 

08 

aO 

04 

90 

04 

aO 

01 

ec 

Ocll : 

a5 

Ob 

4c 

9e 

Oc 

a5 

50 

85 

5d 

0939 : 

90 

15 

be 

Oc 

ab 

12 

6a 

12 

9e 

0aa9 

a6 

61 

84 

66 

aO 

ff 

e8 

c8 

2d 

0cl9 : 

39 

a5 

51 

85 

3a 

4c 

9e 

Oc 

c2 

0941 : 

6a 

12 

6a 

12 

d9 

12 

bb 

12 

d2 

Oabl 

ca 

dO 

04 

a5 

66 

10 

Oc 

bl 

14 

0c21 : 

a2 

05 

bd 

84 

17 

95 

?.d 

ca 

ae 

0949 : 

bb 

12 

ea 

12 

ba 

12 

ea 

12 

11 

0ab9 

6c 

dl 

62 

fO 

f 2 

a9 

01 

bO 

a6 

0c29 : 

10 

f 8 

a6 

2e 

86 

60 

85 

5f 

65 

0951 : 

e2 

12 

62 

11 

62 

11 

57 

11 

25 

Oacl 

02 

a9 

04 

25 

3c 

fO 

02 

a9 

e4 

Oc31 : 

e4 

30 

dO 

04 

c5 

2f 

fO 

13 

a 2 

0959 : 

ab 

Oc 
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Die Lyrik-Maschine: 
Brecht, Trakl, C 64 & Co. 


Ein Computer der dichtet? »Gibt’s nicht««, werden 
Sie sagen. Doch es gibt ihn und Sie besitzen ihn 
sogar! Mit »Lyric 3.0«« wird Ihr C64 zur Lyrik- 
Maschine 

M it Lyric 3.0 haben Sie schnell einen Lyrikband zu¬ 
sammen. Was die Welt allerdings von Computer- 
Dichtung hält, ist fraglich. Wir in der Redaktion wa¬ 
ren jedenfalls über die Ergebnisse erstaunt, denn Lyric 3.0 
reiht nicht nur sinnlos Wörter aneinander. Vielmehr werden 
semantisch und syntaktisch korrekte - Schreibfehler inner¬ 
halb des Programms ausgenommen - Sätze gebildet. 



Allen Anthropozentrikern sei gesagt, daß die von Lyric 3.0 
produzierten Gedichte, per definitionem keinen »Sinn« ha¬ 
ben, was auch immer mit diesem Wort gemeint ist. 

Aber vielleicht besteht der Reiz dieser Gedichte gerade 
darin, daß durch die oftmals absurden Kombinationen von 
Wörtern neue ungewöhnliche Metaphern gebildet werden: 

Lassen Sie sich doch einfach mal ein Gedicht von Lyric 
3.0 ausdrucken, und lesen Sie es sich bei Kerzenschein 
oder flackerndem Kaminfeuer in aller Ruhe durch: 
»Goldene Ränke zerschmettern eine 
Hoffnung. 

Das Auge schreit. 

Da immer wieder pulsierende 
Welten verwehen, stirbt das 
Universum.« 


Beschreibung 


Geben Sie »Lyric 3.0« (Listing) mit dem Checksummer (Sei¬ 
te 158) ein und speichern das Programm. Der Start erfolgt 
mit RUN. Durch einen intelligent programmierten Satzbau¬ 
algorithmus erzeugt dieser Lyrik-Generator semantisch 
korrekte Sätze. Der Wortschatz läßt sich, wie weiter unten 
beschrieben, leicht erweitern. 

Die folgende Programmbeschreibung zeigt Ihnen, wie 
das Programm funktioniert und Sie Ihren eigenen Wort¬ 


schatz anlegen können. Wie stellt das Programm nun ein 
Gedicht her? 

Als erstes müssen ihm verschiedene Parameter überge¬ 
ben werden: 

Anzahl der Strophen (AZ), Anzahl der Verse innerhalb jeder 
Strophe (VA°/o(X)) und der Satzbau jedes einzelnen Verses 
(MN$(X)). 

Sofern diese Daten nicht von Ihnen eingegeben werden, 
werden AZ und das Variablenfeld VA%(X) mit geeigneten 
Zufallszahlen aufgefüllt, während der Computer die Satz¬ 
strukturen MN$(X) aus dem »Satzbauten-Katalog« CO$(X) 
auswählt. Dieser wird bei der Initialisierung aus den Daten 
der DATA-Zeilen 1000-2000 gebildet. Diese ganzen Vorar¬ 
beiten werden im Auto-Modus in den Zeilen 814-818, im ma¬ 
nuellen Modus in den Zeilen 108-242 ausgeführt. 

Nun kommt der weitaus schwierigere Teil: Es müssen 
ganze deutsche Sätze gebildet werden, die den gewünsch¬ 
ten Satzbau besitzen und gleichzeitig den Regeln der deut¬ 
schen Sprache genügen. 

Der Computer bildet korrekte Sätze 


Wie geht das nun vor sich? 

Der C 64 holt sich den Satzbau des aktuellen Verses aus 
MN* 1 v) und legt ihn in W$ ab. Dann durchsucht er W$ nach 
einem ihm bekannten Mnemonik und gibt gegebenenfalls 
eine Fehlermeldung aus. Wird der Mnemonik erkannt, so 
springt das Programm in die entsprechenden Routinen zur 
Ausführung des Befehls. Die Routinen sind teilweise von 
sehr unterschiedlicher Komplexität. So wird bei der Routine 
UND einfach nur ein »und« an den bisherigen Vers ange¬ 
hängt. Bei der Routine SUBJEKT hingegen wird eine gan¬ 
ze Nominalphrase, bestehend aus Artikel, Adjektiv und 
Substantiv, generiert. Dies funktioniert so: Zuerst werden 
die Parameter des Mnemonik — Artikel, Adjektiv, Kasus 
und Numerus — in der Variablen EA,ED,EF,EP eingelesen 
(Zeile 322 ff). 

Da der Kasus des Adjektivs und des Artikels vom Sub¬ 
stantiv abhängt, muß dieses zuerst bestimmt werden. Dies 
geschieht, wie auch alle folgenden Wortauswahlen, per Zu¬ 
fallsgenerator (Zeile 328). Dann wird der passende Artikel 
entweder aus der Tabelle AR$(X) (bestimmte Artikel) geholt 
oder selbst gebildet (unbestimmter Artikel) und mit der kor¬ 
rekten Endung aus der Tabelle EN$(X) versorgt (Zeilen 
330-340). Danach wird ein Adjektiv ausgewählt und mit der 
entsprechenden Endung versehen, die nicht nur vom Ka¬ 
sus, Genus und Numerus des Substantives, sondern auch 
vom Artikel abhängt. Die Endung wird aus den Tabellen 
D2(X)-D4(X) herausgesucht (Zeilen 350-366). Jetzt fehlt 
nur noch das Substantiv. Dieses wurde ja schon ganz am 
Anfang ausgewählt und muß nun die passende Endung be¬ 
kommen. Da ich bis dato kein Linguistiker bin, hat mich die¬ 
ser Teil fast in eine Paranoia getrieben. Ich habe es aber 
schließlich geschafft, aus der Endsilbe und den darin ent¬ 
haltenen Vokalen, dem Kasus, Genus und dem Numerus 
die richtige Endung zu bestimmen, zumindest für 98 Pro¬ 
zent aller Worte (bei Fremdwörtern kann sich das Pro¬ 
gramm eventuell auch mal irren). Die Parameterübergabe 
erfolgt in den Zeilen 370-378, die Endung wird in den Zeilen 
930-966 bestimmt. 
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Sind schließlich gemäß dem Satzbau in W$ alle Glieder 
des Verses bestimmt, so wird der erzeugte Vers ausgege¬ 
ben und das Programm fährt mit dem nächsten Vers fort. 

Bei Ergänzen des Wortschatzes muß beachtet werden, 
daß sich im Programmkopf zu den einzelnen Wortarten je 
ein Zähler befindet (zum Beispiel Q3), der um 1 erhöht wer¬ 
den muß, sobald eine DATA-Zeile der zugehörigen Wortart 
hinzugefügt wird. 

Woher kommen die Worte? 


Wie sehen nun die einzelnen DATA-Zeilen aus? 

Wichtig sind hier nur die Zeilen mit den Nomen, Adjekti¬ 
ven, den Verben und den Satzstrukturen, die im folgenden 
näher erklärt werden sollen. 

Nomen (ab Zeile 2200): 

DATA MANN,MAENNER,MAENNLICHE,1 
Das erste Wort ist die Singular-, das zweite die Plural¬ 
form. Danach folgt ein Adjektiv. Dieses muß im Plural ste¬ 
hen. Das heißt, es muß mit einem »e« enden. Die Zahl zum 
Schluß gibt das Geschlecht des ersten Wortes an. »1« be¬ 
deutet männlich, »2« weiblich, »3« sächlich, »4« ein Name. 
Verben (ab Zeile 6000): 

DATA LAEUFT,LAUFEN,1 

Das erste Wort muß eine 3. Person, Singular-Form sein. 
Das zweite einfach ein Infinitiv. Die Zahl zum Schluß gibt an, 
ob das Verb transitiv (wie beispielsweise »schlagen« oder 
»messen«) oder intransitiv (»schlafen« oder »zerbersten«) 
ist. Im ersten Fall muß die Zahl 0 sein, im zweiten 1. Eine 2 
würde bedeuten, daß das Verb eigentlich beides ist. 
Satzstrukturen (ab Zeile 1000): 

DATA "SUB1001 VRB11” , "EIN HUND SCHLAEFT” 

Das erste Datum ist eine korrekte Satzstruktur, das zwei¬ 
te ein Satz, wie er möglicherweise von dieser Satzstruktur 
erzeugt worden sein könnte. 

Nun liegt es an Ihnen, den Wortschatz von Lyric 3.0 so zu 
übernehmen, wie ich ihn vorgegeben habe, oder ihn nach 
Ihren Wünschen zu ändern. 

So ist es zum Beispiel möglich, die Stimmung, die ein 
von Lyric 3.0 erzeugtes Gedicht hervorrufen kann, gezielt 
zu beeinflussen. Verwenden Sie zum Beispiel nur Worte 
wie »Glas«, »kalt«, »Beton«, »metallisch«, »einsam«, so kann 
das entstandene Gedicht wahrscheinlich einwandfrei als 
Kritik an der Isolation von Bewohnern eines Hochhauses in 
einer Großstadt interpretiert werden. Oder Sie verwenden 
nur Worte wie »Nebel«, »See«, »Drache«, »Hobbit«, »Gan- 
dalf«. In diesem Fall werden die erzeugten Gedichte sicher¬ 
lich einen vollkommen anderen Charakter bekommen. 

Beliebig erweiterbarer Wortschatz 


Zwei Fragen müssen nun noch geklärt werden: Was hat es 
mit den Satzstrukturen auf sich und wie läßt sich das Pro¬ 
gramm erweitern? Die Satzstrukturen sind Strings, die dem 
C 64 genau mitteilen, wie die Form eines Verses aussehen 
soll. Ein Beispiel: 

SUB1101 UND SUB2102 VRB12 TMP SUB2032 
Die dreibuchstabigen Wörter sind Mnemoniks, die ein 
bestimmtes Wort oder eine Gruppe von Wörtern symboli¬ 
sieren. 

»SUB« erzeugt ein Substantiv. Die darauffolgenden Zah¬ 
len geben dem C 64 nähere Informationen zu dem Wort. 

1. Zahl: 0 — Wort ohne Artikel 

1 — mit unbestimmtem Artikel 

2 — mit bestimmtem Artikel 

2. Zahl: 0 — Wort ohne Adjektiv 

1 — mit Adjektiv 


3. Zahl: 0 — Wort im Nominativ 

1 — Genitiv 

2 — Dativ 

3 — Akkusativ 

4. Zahl: 1 — Wort im Singular 

2 — Wort im Plural 
UND gibt das Wort »und« aus. 

ODR gibt »oder« aus. 

TMP erzeugt eine temporale Bestimmung, wie »heute« 
oder »nun«. 

IST gibt »ist« aus. 

SND gibt »sind« aus. 

KON erzeugt eine Konjunktion, wie »weil« oder »eher als«. 
KOM gibt ein Komma aus. 

PRA erzeugt eine Präposition, wie »neben« oder »in«. 

DIE gibt »die« aus, um Sätze wie »Wirbel, die zerfließen« er¬ 
zeugen zu können. 

VRB erzeugt ein Verb. Es wird durch zwei direkt folgende 
Zahlen spezifiziert. 

1. Zahl: 


0 — transitives Verb 
1 — intransitives Verb 

2. Zahl: 

1 — Singularform 

2 — Pluralform 

IWO gibt so undefinierbare Worte wie »immer wieder« oder 
»niemals« aus. 


KSS erzeugt ein Subjekt wie »niemand« oder »alles«. 

Oben genannte Satzstruktur könnte zum Beispiel folgen¬ 
des erzeugt haben: »Ein bunter Hund und die silbernen 
Ringe schlagen nun die Wände.« Lyric 3.0 ist vom Aufbau 
her teilweise recht kompliziert, daher ein paar Erläuterun¬ 
gen zu den verschiedenen Abschnitten des Programmes: 
11-28 Variablendefinition und Anlegen der Felder 

29-47 Anfangsbild 

49-64 Einlesen der Wörter und Endungen in 
Felder 

100 Beginn der Session zwischen C 64 und 

Benutzer: 


Folgende Daten müssen bestimmt werden: 
Anzahl der Strophen 

Anzahl der Verse der einzelnen Strophen 
Satzstrukturen der einzelnen Verse 
Auf Wunsch kann aber auch alles vom 
Computer erledigt werden. 

242 Ende der Session 
300- 700 Auswertung der Satzstrukturen 
700- 770 Ausgabe eines Verses auf Bildschirm und 
eventuell Drucker 

800- 818 Automodus ? Wenn ja, dann Erzeugung 
aller notwendigen Daten 

900- 906 Auswertung eines Tastendruckes (ja/nein) 
920- 928 Routine zur Eingabe maximal zweistelliger 
Zahlen 

930- 966 Routine zur Berechnung der Endung eines 
Substantives aus Kasus, Genus und End¬ 
silbe 

970- 978 Soundroutine 
980- 989 Gong 
990-1000 Musikroutine 
1000-1500 Satzstrukturen 

2000-2200 Endungen, Präpositionen, Konjunktionen 
etc. 

2200-6000 Nomen und Adjektive 
ab 6000 Verben 


Das Programm benutzt viele Variablen. Die wichtigsten: 

E$(X) Feld, das die einzelnen Worte eines Verses 
enthält 
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LISTINGS 


Z2 Zeiger auf das nächste freie Element von 

E$(X) 

ZI Zeiger auf den nächsten noch nicht inter¬ 

pretierten Buchstaben der Satzstruktur 
AZ Anzahl der Strophen 

VA°/o(X) Anzahl der Verse der einzelnen Strophen 

AR$ j,n: Soll gedruckt werden? 


Q0-Q8 Anzahl der Satzstrukturen, Nomen etc. 
MN$(X) Dieses Feld enhält die Satzstrukturen für 
das ganze Gedicht 

AD$ Endung, die zu dem Subjekt addiert werden 

muß. 

Ich schlage Ihnen einfach mal vor, daß Sie ein wenig mit 
Lyric 3.0 herumexperimentieren. (Dirk Meier/sk) 


LYRIC 3.0 

IT 'S AN EXPERIENCE 

WRITTEN BY 
DIRK MEIER 


1 REM 

2 REM 

3 REM 

4 REM 

5 REM 

6 REM 

10 REM 

11 REM ANZAHL VON: 

12 Q0=19:REM MNEMONIC-KETTEN 

13 Q1=8:REM PRAEPOSITIONEN 

14 Q2=6:REM TEMPORALE BESTIMMUNGEN 

15 03=25:REM KONJUNKTIONEN 

16 04=138:REM NOMEN,ADJEKTIVE 

17 05=90:REM VERBEN 

18 06=10:REM IRGENDWELCHE WORTE 

19 07=8:REM ENDSILBEN FUER NOMEN 

20 08=6:REM IRGENDWELCHE SUBJEKTE 

21 POKE 53281,14:POKE 53280,6:PRINT CHR*<1 
47)CHR*(14)CHR*<B> 

22 DIM VAX(20),MN*(150), PM*(20,1), D2*< 11) , 

D3*<15),D4*<15),DX(Q4+Q5—2) 

24 DIM EN*<15),AR*<15>,PR*<Q1-1>,ZE*(Q2-1> 
,K0*<Q3-1),N0*(04-1,3) 

26 DIM VB*(05-1,2),E*<20),CO*<O0-1>,IW*(06 
-1),KS*(Q8-1) 

28 S1=54272:S2=S1+7:S3=S2+7:F0R A=0 TO 24: 

POKE Sl+A,0:NEXT 

29 FOR A=1 TO 20:FOR B=1 TO 0 STEP-1:PRINT 
"< HOME>";:POKE 646,B:POKE S1+24,0:POKE 
Sl+24,15 

30 PRINT: PRINT" 21RK BEIER'S A.YRIC 3.0":PR 

INT" ====================•■: NEXT B,A *223iu. 

31 POKE 646,1:PRINT:PRINT" £IN SEDICHT—SYN 
THESE UROGRAMM." 


<194> 

< 165> 
<103> 
<066> 
<062> 
<058> 
<072> 
<064> 
<073> 
<157> 
< 110 > 
< 212 > 
<124> 

< 187> 
<067> 
< 020 > 
<126> 

< 146> 
<234> 
<125> 
<128> 
<058> 


<166> 


< 135> 


32 PRINT:PRINT" ENTWICKELT NACH NAECHTELAN 
GEN" 

34 PRINT" SCHLACHTEN MIT DER DEUTSCHEN £RA 
MMATIK." 

36 PRINT" BREETINGS TO STORM, S3RCHERT,£RIE 
D.flSTEL UND ENZENSBERGER_" 

38 PRINT:PRINT" HUT NEVER FORGET:":PRINT" 
EEEP IT HEAVY AND KEEP IT HARD..." 

40 PRINT:PRINT" ABER JETZT: Kl lT SHIFT—8PAC 
EI KI.5.1 <SHIFT-SPACE> 0PT1HUS !":PRINT 

44 PRINT CHRS<18>" ICH WARTE AUF EINE SEAK 
TION VON IHNEN 12SPACE > " 

46 GET A*:IF A*=""THEN 46 

47 GOSUB 970:PRINT CHR* < 18) " <11SPACEJ.5ITTE 

ETWAS WARTEN<11SPACE>" 

49 FOR A=1 TO 35:READ A*:NEXT 

50 FOR A=0 TO 00—1:READ CO*<A>,A*:NEXT:REA 
D A*,A*,A* 

52 FOR A=0 TO 15:READ EN*<A):NEXT:REM ENDU 
NGEN 

53 FOR A=0 TO 11:READ D2*(A):NEXT:REM ENDU 
NGEN2 

54 FOR A=0 TO 15:READ D3*(A):NEXT:REM ENDU 
NGEN3 

55 FOR A=0 TO 15:READ D4*<A):NEXT:REM ENDU 
NGEN4 

56 FOR A=0 TO 15:READ AR*(A):NEXT:REM BEST 
.ARTIKEL 

58 FOR A=0 TO 01-1:READ PR*(A):NEXT:REM PR 
AEPOSITIONEN 

59 FOR B=0 TO 02—1:READ ZE*<B):NEXT B:REM 
TEMP. BESTIMMUNGEN 

60 FOR A=0 TO Q3—1:READ KO*(A):NEXT:REM KO 
NJUNKTIONEN 

61 FOR A=0 TO Q6—1:READ IW*(A):NEXT:REM IR 
GENDWELCHE WORTE 

62 FOR A=0 TO 08-1:READ KS*<A):NEXT A:REM 
IRG. SUBST. 

63 FOR A=0 TO 04-1:FOR B=0 TO 3:READ NO*(A 
,B):NEXT B,A:REM NOMEN,ADJEKTIVE 

64 FOR A=0 TO Q5-1:F0R B=0 TO 2:READ VB*(A 
,B):NEXT B,A:REM VERBEN 


< 112 > 


<093> 


<050> 


<225> 


<0B5> 


<254> 

< 120 > 


<147> 

<078> 


<060> 


<034> 


<156> 


<209> 


< 002 > 


< 133> 


< 157> 


< 156> 


<127> 


< 177> 


<066> 


<018> 


< 212 > 


100 GOSUB 970:PRINT CHR*(147>" AUSDRUCKEN 
LASSEN WOLLEN SIE SICH DIE" 

102 PRINT" BEDICHTE DOCH SICHERLICH...ODER 

?“:GOSUB 980 

105 GET DR*:IF DR*<>"J"AND DR*< >"N"THEN 10 
5 

107 A*=DR*:GOSUB 900:GOTO 800 
10B PRINT:PRINT" SUMMEN WIR ZU DEM AUFBAU 
DER STROPHEN." 

109 PRINT" HIE VIELE STROPHEN SOLLEN ES SE 
IN ?";:GOSUB 980 

110 GOSUB 920:AZ=KK:IF AZ=1 THEN 122 

111 IF AZ<1 THEN PRINT:GOTO 110 

112 PRINT:PRINT" SOLLEN ALLE STROPHEN DIE 
GLEICHE" 

113 PRINT" ANZAHL VON .VERSEN HABEN ?";:GOS 
UB 980 

114 GET F3*:IF F3*="J"THEN PRINT" JA":GDTO 

122 

116 IF F3*< >"N"THEN 114 

118 PRINT" NEIN":PRINT" HIEVIEL HERSE SOLL 
EN ES JEWEILS SEIN :FOR D=0 TO AZ-1 
120 PRINT D+l". STROPHE ";:GOSUB 920:VAX(D 
)=KK:NEXT:GOTO 136 

122 PRINT:PRINT"<SHIFT-SPACEJHIEVIELE HERS 
E SOLLEN ES SEIN GOSUB 980:GOSUB 9 
20:F1=KK 

124 FOR A=0 TO AZ-1:VAX<A)=F1:NEXT 
134 A*=CH*:GOSUB 900:PRINT 
136 PRINT" HIR KOMMEN ZUM FORMALEN AUFBAU 
DER":PRINT“ STROPHEN UND HERSE." 

,gg P RINT" HOLLEN SIE EIGENE SATZSTRUKTURE 

140 PRINT" EINGEBEN (1) ODER BEREITS GESPE 
ICHERTE":PRINT" VERWENDEN (2)"; 

141 GOSUB 980 

142 GET Fl*:IF F1*<>“1"AND F1*<>"2"THEN 14 
2 

144 IF F1*="2"THEN PRINT" GESPEICHERTE":GO 
TO 200 

146 PRINT" SELBST EINGEBEN" 

180 PRINT CHR*(147):PRINT" 1. STROPHE“:FOR 

A=1 TO VAX(0) .-PRINT A". HERS"; 

181 INPUT MN*(A—1):NEXT:IF F3*="N"THEN PRI 
NT:GOTO 190 

182 IF AZ=1 THEN 196 

183 PRINT:PRINT" SOLLEN ALLE RESTLICHEN ST 
ROPHEN DEN" 

184 PRINT" GLEICHEN AUFBAU BESITZEN ";:GOS 
UB 980 

185 GET Fl*:IF F1*="J"THEN PRINT" JA":GOTO 

196 

186 IF F1*<>"N"THEN 185 

190 PRINT" NEIN“:FOR A=1 TO AZ-1:PRINT A+l 
". STROPHE":FOR B=1 TO VAX(A):PRINT B" 
. HERS"; 

192 INPUT" “;MN*(A*VAX(A> +B—1):NEXT B:PRIN 
T:NEXT A:GOTO 300 

196 FOR A=1 TO AZ:FOR B=0 TO VAX(0)-1:MN*( 
A*VAX(A)+B)=MN* <B):NEXT B,A:GOTO 300 
200 PRINT: PRINT" IHR £64 WIRD .IHNEN NUN AL 
LE IN DEN" 

202 PRINT" ÄBJA-ZEILEN GESPEICHERTEN SATZ- 

204 PRINT“ STRUKTUREN AUFLISTEN UND FRAGEN 

206 PRINT" OB SIE SIE BEI IHREM' BEDICHT 

208 PRINT" VIELLEICHT BRAUCHEN KOENNEN.":P 
RINT" SINE ERSTE AUSWAHL ALSO." 

210 PRINT" HAMIT SIE SEHEN,WAS SIE DA SO A 
US-" 


<056> 

< 118> 

<238> 

<252> 

<040> 

<063> 

<063> 

<182> 

< 126> 

<127> 

< 212 > 
<024 > 

<135> 

< 210 > 

<228> 

<063> 

<205> 

< 136> 
<218> 

< 120 > 
<021 > 

<236> 

<029> 

<027> 

< 002 > 

<077> 

< 131 > 

<043> 

<225> 

<006> 
<095 ,i 

< 127 ;.' 

< 1461 
<201 > 
< 211 > 
<092> 
<093> 
<201 > 
<033> 
<006> 


Listing. »Lyric 3.0«. Beachten Sie 
die Eingabehinweise auf Seite 158. 
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212 

PRINT" WAEHLEN,WIRD IHNEN ZU JEDER STR 


362 

E* (Z2 > =N0* (RND < 1) *Q4,2 > : IF EA=0 THEN E 



UKTUR" 

<251 > 


*(Z2)=E*(Z2)+D3*(EF+12) 

<093> 

214 

PRINT" EIN SATZ GELIEFERT,WIE ER VOM £ 


364 

IF EA=2 THEN E*<Z2>=E*(Z2>+D4*(EF+12) 

<079> 


RORAMM", 

< 120> 

366 

Z2=Z2+1:REM **** SUBSTANTIV *»*»» 

<247> 

216 

PRINT" UNTER JENUTZUNG EBEN JENER STRU 


370 

E*(Z2)=N0*(WA,EP—1):L0*=RIGHT*(E*(Z2), 



KTUR" 

<149> 


1):L1*=MID*(E*(Z2>,LEN(E*(Z2)>-1,1) 

< 106> 

21B 

PRINT" PRODUZIERT WERDEN KOENNTE.":ZZ= 


371 

LZ*=MID#(E*(Z2),LEN(E*(Z2)> —2,1) 

<047> 


0:RESTORE:GOSUB 980 

<125> 

372 

VO=0:IF L0*="A"OR L0*=“E"OR L0*="I"OR 


219 

FOR A=1 TO 35:READ A*:NEXT 

<248> 


L0*="O"OR L0*="U"THEN VO=100 

<067> 

220 

PRINT:READ A*,B*:IF A*="@@@"THEN 230 

< 107> 

374 

IF L1*="A"0R Ll*="E"OR L1*="I"0R Ll*=" 


221 

PRINT A*:PRINT B*:PRINT CHR*(1B)“J/N" 

<233> 


0"0R L1*="U"THEN VO=VO+10 

< 165> 

222 

GET C*:IF C*="N"THEN 220 

<24B> 

375 

IF LZ*="A"OR LZ*="E"OR LZ*="I"OR LZ*=" 


224 

IF C*<>"J"THEN 222 

< 131 > 


0"0R LZ*="U"THEN V0=V0+1 

<192> 

226 

PM* (ZZ , 0) =A*: PM* (ZZ , 1) =B*: ZZ=ZZ+1: GOTO 


376 

L2*=L0*+L1*:L3*=RIGHT*(E*(Z2),3) 

< 198> 


220 

<225> 

378 

GOSUB 930:E*(Z2)=E*(Z2> +AD*:Z1=Z1+8:GO 


230 

PR INT .-PRINT" «AEHLEN SIE NUN FUER JEDE 



TO 710 

<012> 


N £ERS DIE" 

<204> 

410 

REM-VERBUM- 

<083> 

232 

PRINT" GEWUENSCHTE SATZSTRUKTUR AUS.": 


412 

IF M*<>"VRB"THEN 430 

<099> 


GOSUB 980 

<168> 

414 

EP=VAL(MID*(W*,Z1+3,1>):EP=VAL(MID*(W* 


234 

BET A*:IF A*=""THEN 234 

<077> 


,Z1+4,1)) 

< 156> 

236 

PRINT CHR*(147>:PRINT:FOR A=0 TO ZZ-ls 


416 

WA=RND(1> *Q5:IF(VAL(VB*(WA,2 > > < >ET > AND 



PRINT CHR*(A+65>". ";PM*(A,1):NEXT 

<004> 


(VAL(VB*(WA,2)))<>2 THEN 416 

<000> 

23B 

FOR A=0 TO AZ —1: FOR B=0 TO VAX CA)-1: PR 


418 

E*(Z2)=VB*(WA,EP—1>:Zl=Zl+6:GOTO 710 

<251 > 


INT CHR*(19)"<23SPACE>" 

<226> 

430 

REM - IRGENDWELCHE WORTE - 

<214> 

239 

PRINT CHR*(19)A+1". STROPHE,"B+l". £ER 


432 

IF M*< >"IWO"THEN 440 

<233> 


ST3SPACE}" 

< 173> 

434 

E*(Z2> =IW*(RND <1)*06):Zl=Zl+4:GOTO 710 

<074> 

240 

GET A*:IF A*=""THEN 240 

< 146> 

440 

REM-DIE- 

<200> 

241 

IF ASC(A*><65 OR ASC(A*>>ZZ+64 THEN 24 


442 

IF M*="DIE"THEN E*(Z2>="DIE":Zl=Zl+4:G 



0 

<08B> 


OTO 710 

<246> 

242 

MN*(A*VA%(A)+B > =PM*(ASC < A* >-65,0):NEX T 


444 

REM-,- 

<192> 


B,A 

<213> 

446 

IF M*="KOM"THEN E*(Z2):Zl=Zl+4:GOT 


300 

REM +++++ MNEMONICS AUSWERTEN ++++ 

<239> 


0 710 

<093 > 

301 

POKE 53281,5:POKE 53280,0:POKE 646,1:P 


448 

REM-IST/SIND- 

<200> 


RINT CHR*(147); 

<014> 

450 

IF M*="IST"THEN E*(Z2)=M*:Z1=Z1+4:GOTO 


302 

FOR A=1 TO 10:PRINT:NEXT:PRINT TAB(10) 



710 

<245> 


5 

<225> 

452 

IF M*="SND"THEN E*(Z2)="SIND":Zl=Zl+4: 


303 

FOR A=1 TO 19:PRINT MID*("L'ART POUR L 



GOTO 710 

<130> 


•ART...",A,l);:FOR B=1 TO 10 

<230> 

454 

REM-IRGENDEIN SUBJEKT- 

< 156> 

304 

POKE Sl+24,0:POKE Sl+24,15:NEXT B,A:FO 


456 

IF M*="KSS"THEN E* (Z2) =KS* (RND (1 > *Q8> 



R A=1 TO 1000:NEXT:IF DR*="J"THEN OPEN 



Z1=Z1+4:GOTO 710 

<120> 


1,4,0 

<085> 

699 

REM-AUSGABE- 

< 111 > 

305 

PRINT CHR* <147):FOR A=0 TO AZ-l:FOR B= 

SAER 

700 PP-»'.'r"«JULR_ _UN.KXQ.KK .HN.E.H.O.N.I.C: ": PRINT 



0 TO VAX(A)—1:W*=MN*(A*VAX(A)+B>:Zl=l: 



*' "; M*: END 

<085> 


Z2=0 

< 190> 

710 

Z2=Z2+1: GOTO 306 

<072> 

306 

M*=MID*(W*,Z1,3) : IF M*='"'THEN 712 

<137> 

712 

FOR X=0 TO Z2—1:P*=P*+E*(X):IF E*(X><> 


307 

REM-UND- 

< 17B> 


","THEN P*=PS+" " 

<059> 

30B 

IF M*="UND"THEN E*(Z2>=M*:Zl=Zl+4:GOTO 


714 

NEXT X 

< 154> 


710 

<072> 

722 

PRINT LEFT*(P*,LEN(P*)-1);".“ 

<209> 

309 

REM-ODER- 

< 137> 

724 

IF DR*=“J"THEN PRINT#1,LEFT*(P*,LEN(P* 


310 

IF M*="ODR"THEN E*(Z2> = "ODER":Z1=Z1+4: 



>-1);"." 

<228> 


GOTO 710 

<231 > 

730 

..NEXT B:PRINT:IF DR*="J"THEN PRIN 


311 

REM - PRAEPOSITION - 

<090> 


T#1 

<147> 

312 

IF M*="PRA"THEN E*(Z2)=PR*(RND(1)*Q1): 


740 

FOR X=0 TO Z2:E*(X)=“":NEXT 

<165> 


Z1=Z1+4:GOTO 710 

< 125> 

750 

IF DR*="J"THEN PRINT#1 

<171 > 

313 

REM - KONJUNKTION - 

<140> 

760 

GOSUB 980: NEXT A.-CLOSE 1: GOSUB 992: POK 


314 

IF M*= "KON 11 THEN E* <Z2) =KO* <RND < 1) *Q3) : 



E 198,0:WAIT 198,1:P0KE 198,0 

<094 > 


Zl=Zl+4:GOTO 710 

<250> 

762 

PRINT:PRINT:PRINT" AOCH’N SEDICHT ?“ 

<23B> 

315 

REM - TEMP. BESTIMMUNG - 

<033> 

764 

GET A*:IF A*=""THEN 764 

< 196> 

316 

IF M*< >"TMP"THEN 320 

<207> 

766 

IF A*="N"THEN RUN 

<028> 

31B 

E*(Z2)=ZE*(RND(1>*Q2>:Zl=Zl+4:GOTO 710 

< 144> 

768 

IF A*="J"THEN 300 

<068> 

319 

REM-SUBJEKT- 

<037> 

770 

GOTO 764 

<208> 

320 

IF M*< >"SUB"THEN 410 

< 138> 

800 

REM-AUTO- 

< 129> 

322 

EA=VAL (MID* < W*,Z1+3,1> >: ED=VAL (MID* (W* 


802 

PRINT:PRINT" SIE KOENNEN ZWISCHEN EINE 



,Z1+4,1)> SEF=VAL(MID*(W*,Z1+5,1>) 

<247> 


M HALB- CI 3" 

<239> 

324 

EP=VAL(MID*(W*,Z1+6,1)) 

<001 > 

804 

PRINT” UND EINEM VOLLAUTOMATISCHEN C23 


326 

IF EP=2 AND EA=1 THEN EA=2 

< 117> 


SODUS" 

<020> 

328 

WA=INT(RND(1)*Q4>:GE=VAL<NO*(WA,3>)-l 

<235> 

806 

PRINT" WAEHLEN.iM ERSTEREN MUESSEN SIE 


329 

IF GE=-1 THEN EA=0:GE=0:ED=0:FX=1:GOTO 



•• 

< 134> 


370 

< 156> 

808 

PRINT" ANGABEN ZUR AORM DES ßEDICHTES 


330 

FX=0:IF EA<2 THEN 340 

<061 > 


MACHENC3SPACE>IM ZWEITEN NICHT.GOSU 


331 

IF EP=1 THEN E*(Z2)=AR*(EF*3+GE> 

<165> 


B 980 

<231 > 

332 

IF EP=2 THEN E*(Z2>=AR*(EF+12) 

<158> 

810 

GET A*:IF A*="1"THEN PRINT" HALB":GOTO 


334 

Z2=Z2+1:GOTO 350 

<094> 


108 

<002> 

340 

IF EA=1 THEN E*(Z2>="EIN"+EN*(EF*3+GE) 


812 

IF A*< >"2"THEN 810 

<141 > 


:Z2=Z2+1 

< 157> 

813 

PRINT" VOLL" 

<083> 

350 

IF ED=0 THEN 370 

< 146> 

814 

AZ=INT(RND(TI)#10)+3:R=INT(RND(l)*8)+3 


351 

IF EP=2 THEN 362 

<218> 


:FOR A=0 TO AZ-1:VAX(A)=R:NEXT 

<053> 

352 

E* <Z2> =NO*(RND(1)*04,2):IF EA=0 THEN E 


816 

FOR A=0 TO R—1:B=INT(RND(1)*Q0):FOR C= 



*(Z2)=E* < Z2>+D3*(EF*3+GE> 

<154> 


0 TO AZ-1:MN*(C*R+A)=C0*(B>:NEXT C,A 

<094> 

354 

IF EA=1 THEN E*(Z2>=E*(Z2)+D2*(EF*3+GE 


818 

GOTO 300 

<000> 


) 

<040> 

900 

REM ++ JA/NEIN ++ 

< 137> 

356 

IF EA=2 THEN E*(Z2)=E*(Z2>+D4*(EF*3+GE 


902 

IF A*="J"THEN PRINT" JA" 

<069> 


> 

< 107> 

904 

IF A*="N"THEN PRINT" NEIN" 

<028> 

360 

Z2=Z2+1:GOTO 370 

< 152> 

906 

RETURN 

<202 > 



98 
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920 REM ++ ZAHLEN-EINGABE ++ <182> 

922 KK=0:FOR A=1 TO 0 STEP-1 <239> 

924 GET A$:IF A*=CHR*<13)THEN KK=KK/10:GOT 

O 928 <211> 

925 IF ASC<A*+CHR*<0> X4B OR ASC<A*+CHR*<0 

))>57 THEN 924 <238> 

926 PRINT A*; :KK=VAL(A#)*10TA+KK <106> 

928 NEXT:PRINT:RETURN <004> 

930 REM +++ ENDUNG SUBSTANTIV +++ <224> 

932 ADS=.IF EP=2 THEN 960 <118> 

934 ON GE+1 GOTO 936,952,936 <015> 

936 ON EF+1 GOTO 952,938,946,953 <175> 

937 REM +++ SING.MAS.GEN +++ <023> 

938 AD*="ES”:IF L0*="E"AND(VO AND 110>=100 

AND GE=0 THEN AD*="NS":GOTO 945 <107> 

939 IF L3*="NET"0R L2*="RR"THEN AD*="EN":G 

OTO 945 < 164 > 

940 IF(L0*="R"DR L0*="N"OR L0*="L")AND<(VO 

AND 10)=10)THEN AD*=”S":GOTO 945 <023> 

941 IF F7.= l THEN AD*="S": GOTO 945 <109> 

942 IF L0*="S"AND VDHOll THEN AD*="SES" <121> 

943 IF V0<=1 THEN AD*="ES" <041> 

944 IF AD*="ES"AND L0*=“E"THEN AD*=”S" <078> 

945 RETURN <241> 

946 REM +++ SING.MAS.DAT +++ <167> 

947 AD*=“E":IF L0*="E"THEN AD*="" <228> 

94B IF L3*="NET"OR L2*="RR"THEN AD*="EN":G 

OTO 949 <189> 

949 IF< <L0*="R"OR L0*="N"OR L0*="L" ) AND (VO 

AND 10=10))OR V0<=1 THEN AD*="" <128> 

950 IF(VO AND 110)=100 AND GE=0 THEN AD*=" 

N " <227> 

951 IF F7.=l THEN AD*="" <056> 

952 RETURN:REM +++ SING.MAS.AKK +++ <121> 

953 IF L3S="NET"0R L2S="RR 11 THEN AD*="EN" <235> 

954 IF(VO AND 110)=100 AND GE=0 THEN AD*=" 

N " <231> 

955 IF F7.= l THEN AD*="“ <060> 

956 RETURN <252> 

960 REM +++ PLURAL +++ <239> 

962 IF EF< >2 THEN 966 <033> 

964 IF L0*O"N"THEN AD*= 11 N" <108.'OD 

966 RETURN <006> 

970 REM-TITLE-SOUND- <029> 

972 POKE S1+24,15:POKE S1+5,15:P0KE S2+5,1 

5:POKE S3+5,15:POKE Sl+6,247 <015> 

974 POKE S2+6,247:POKE S3+6,247:POKE Sl+4, 

17:POKE S2+4,17:POKE S3+4,17 <091> 

976 FOR V=0 TO 179 STEP 5 :POKE Sl+l,V:POK 

E S2+1,V*5/4:P0KE S3+l,V*10/7 <207> 

978 NEXT:POKE Sl+4,32.-POKE S2+4,32:P0KE S3 

+4,32:RETURN <252> 

980 REM-GONG- <025> 

982 POKE Sl+24,15+16:POKE S1+23,7:P0KE S1+ 

1,10:POKE Sl+3,100:POKE Sl+5,15 <214> 


984 POKE S1+6,250:POKE S2+1,6:POKE S2+3.10 

0:POKE S2+5,15:POKE S2+6,250 <189> 

986 POKE S3+1,20:POKE S3+3,100:POKE S3+5,l 

5:POKE S3+6,250:POKE Sl+4,17 <212> 

988 POKE S2+4,21:POKE S3+4,17:F0R S=1 TO 1 

00:NEXT:POKE S1+4,16:P0KE S2+4.20 <248> 

989 POKE S3+4,16:RETURN <127> 

990 REM-MUSIC- <133> 

992 POKE S1,0:POKE S2,0:POKE S3,0:POKE S1+ 

1,0:POKE S2+1,0:POKE S3+l,0 <194> 

993 POKE Sl+24,15+16:P0K£ S1+23,0:POKE S1+ 

5,15:POKE Sl+6,250:POKE S2+5,15 <232> 

994 POKE S2+6,250:POKE S3+5,15:P0KE S3+6,2 

50:POKE Sl+4,33:POKE S2+4.33 <201> 

995 POKE S3+4,33:RESTORE:FOR A=1 TO 5:READ 

H,X1,X2,Y1,Y2,Z1,Z2:POKE Sf+l,Xl <139> 

996 POKE S1,X2:POKE S2+1,Y1:P0KE S2,Y2:P0K 
E S3+1,Z1:POKE S3,Z2:F0R B=1 TO H:NEXT 

B.A <247> 

997 POKE Sl+4,32:POKE S2+4,32:P0KE S3+4,32 

: RETURN < n6> 

998 DATA 1000,6,133,8,180,10,247,500,9,196 

,10,247,13,10 < ni> 

999 DATA 1000,17,103,14,162,10,247,1500,19 

,137,26,20,32,219 <110> 

1000 DATA 2000,21,237,26,20,34,207 <090> 

1001 REM +++++ SATZ-STRUKTUREN +++++ <207> 

1002 DATA "SUB2001 VRB11","DER STEIN ERSTA 

R RT " <132> 

1003 DATA "SUB2001 UND SUB2001 VRB12","DER 

STEIN UND DAS GEWEBE ERSTARREN" <122> 

1004 DATA "PRA SUB1021 VRB12 SUB2102","HIN 

TER DEM SAR FLIESSEN DIE STEINE" <130> 

1005 DATA "SUB0102 VRB02 SUB1031 ”,"STEINE 

SCHLAGEN EINEN BANN“ <078> 

1006 DATA "SUB2011 SUB0001 VRB11 IWO","DES 

BANNES HUT LIEGT IRGENDWO" <223> 

1007 DATA "KON SUB1101 VRB11 KOM VRB12 SUB 

2002 " < 122 > 

1008 DATA "DA DER HUT RINGT,ESSEN DIE £IER 

" <217> 

10n<? DATA "IWO VRB01 SUB2001 SUB2132“, "BAT 

UERLICH TOETET £ONAN DIE ÜUETE" <172> 

1010 DATA "SUB2102 VRB12 KOM KON SUB1001 S 

UB2131 VRB21" <189> 

1011 DATA "äER ÜUT EIERT,WEIL DIE £RAU DAS 

HASSER <2SPACE>TRINKT" <051> 

1012 DATA "SUB0002 UND SUB0002 KOM SUB2001 

VRB11" <208> 

1013 DATA "HEXEN UND TEUFEL,DER HEG VERWHT 

" <232> 


Listing. »Lyric 3.0« (Fortsetzung) 
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1014 

DATA "SUB0002 KOM DIE VRB12","£LANETE 


2208 

DATA 

MANN,MAENNER,TROCKENE,1 

< 168> 


N.DIE VERGEHEN“ 

<007> 

2209 

DATA 

PLANET,PLANETEN,RUNDE,1 

<139> 

1015 

DATA "KON IWO SUB2001 VRB11 KOM VRB12 


2210 

DATA 

WUESTE,WUESTEN,KALTE,2 

<082> 


SUB2002 UND SUB2002" 

<037> 

2211 

DATA 

KAELTE , WINDE , WARME , 2 

<02B> 

1016 

DATA "HEIL KEIN HOLE SCHWEBT,SCHLAFEN 


2212 

DATA 

GRAB,BRAEBER,EISKALTE,3 

<227> 


I2SPACEJDIE ÜUETE UND DIE £IER" 

< 184> 

2213 

DATA 

GLOCKE,GLOCKEN,GOLDENE,2 

< 113> 

1017 

DATA “SUB2001 KOM SUB1101 KOM VRB01 S 


2214 

DATA 

FELD,FELDER,ALTE,3 

<003> 


UB0032" 

<211 > 

2215 

DATA 

SEE,LEUTE,FEUCHTE,1 

< 177> 

1018 

DATA "DER HUND,EIN BLAUES JIER,TOETET 


2216 

DATA 

HERR,HERREN,PRAECHTIGE,1 

<1B0> 


ÜFERDE" 

<236> 

2217 

DATA 

WEG,WEGE,GEFAEHRLICHE,1 

< 199> 

1019 

DATA "TMP VRB11 SUB2101","BALD ERTRIN 


2218 

DATA 

TIER,TIERE,GRAUE,3 

<068 > 


KT £ONAN" 

<067> 

2219 

DATA 

WELT,WELTEN,SCHWARZE,2 

<0B3> 

1020 

DATA "TMP IST SUB2001 SUB1101","NUN I 


2220 

DATA 

LAND,LAENDER,LEUCHTENDE,3 

<253> 


ST DER HUT EIN BLAUER £LECK" 

< 108> 

2221 

DATA 

KRAEHE , KR AEHEN , TOTE, 2 

<053> 

1021 

DATA "SUB0002 VRB12 PRA SUB2021","HER 


2222 

DATA 

SCHLACHT,SCHLACHTEN,PRASSELNDE,2 

<060> 


ZEN RIESELN IN DEM L.ICHT" 

< 196> 

2223 

DATA 

LUFT,LUEFTE,SILBERNE,2 

<240> 

1022 

DATA "SUB2001 VRB11 KOM KON SUB2001 V 


2224 

DATA 

MACHT,MAECHTE,MAECHTIBE,2 

<214> 


RB11" 

<073> 

2225 

DATA 

RING,RINGE,URALTE,1 

< 143> 

1023 

DATA "DIE £REUDE FUNKELT,WENN DER ^C 


2226 

DATA 

STEINTUER, PFADE , WEISE , 2 

<045> 


HERI6SPACE JDUFTET" 

< 112> 

2227 

DATA 

Z ÄUßERER,Z ÄUßERER,EINSAME,1 

<235> 

1050 

DATA "SUB2002 SND SUB0102 KOM KON SUB 


2228 

DATA 

WOLF , WOELFE , HEULENDE, 1 

<165> 


2001 VRB11" 

< 178> 

2229 

DATA 

FEUER,FEUER,BRENNENDE,3 

< 167> 

1051 

DATA "DIE flAEREN SIND GRUENE flEPFEL,W 


2230 

DATA 

WOLKE,WOLKEN,WEISSE,2 

< 158> 


EIL DERI3SPACE>ÜUT EIERT" 

<065> 

2231 

DATA 

WIRBEL,WIRBEL,REISSENDE,1 

<027> 

1052 

DATA "SUB0002 KOM SUB0002 KOM SUB0002 


2232 

DATA 

WELLE , WELLEN , NASSE, 2 

< 164> 


KOM KSS VRB11" 

< 191 > 

2233 

DATA 

STERN,STERNE,STRAHLENDE,1 

<149> 

1053 

DATA "flEPFEL,AIRNEN,HIRBEL,ALLES VERG 


2234 

DATA 

PFERD,PFERDE,STOLZE,3 

<202> 


EHT" 

<030> 

2235 

DATA 

TOR,TORE.GEWALTIGE,3 

<224> 

1054 

DATA "KON SUB2002 VRB12 KOM IST SUB20 


2236 

DATA 

FESTUNG,FESTUNGEN,STARKE,2 

< 137> 


01 SUB1101" 

<216> 

2237 

DATA 

HOFFNUNG,HOFFNUNGEN,MUEHSAME,2 

<074> 

1055 

DATA "WEIL DER flUT SINGT,IST DER BANN 


2238 

DATA 

PFLICHT, PFLICHTEN , ERNSTE , 2 

<112> 


EINE {6SPACE JJEST IE" 

<000> 

2239 

DATA 

AUGE , AUGEN , MAG ISCHE, 3 

<041 > 

1500 

DATA @@@,@@@ 

<237> 

2240 

DATA 

ZWEI FEL .ZWEI FEL , URALTE , 1 

<085> 

2000 

REM +++++ DEKLINATIONEN +++++++ 

<151 > 

2241 

DATA 

STERBEN,SCHICKSALE,UNENDLICHE,3 

< 185> 

2002 

DATA @1,,E,,ES,ER,ES,EM,ER,EM,EN,E, 

<086> 

2242 

DATA 

GANG,GAENGE,UNIRDISCHE,1 

<157> 

2004 

DATA E,ER,EN,E 

<233> 

2243 

DATA 

VERZWEIFELUNG.STIMMEN,GRAUSAME,2 

<185> 

2010 

REM +++++ DEKLINATIONEN +++++++ 

< 161 > 

2244 

DATA 

WIRKLICHKEIT,VOELKER,UNWIRKLICHE 


2012 

2014 

2016 

DATA R,,S,N,N,N,N,N,N,N,,S:REM EIN 

REM +++++ DEKLINATIONEN +++++++ 

DATA R,,S,N,R,N,M,R,M,N,,S,,R,N,:REM 

<006> 

< 165> 

2245 

2246 

,2 

DATA 

DATA 

DENKEN , GEDANKEN , DENKBARE, 3 

ORK,ORKS,GIFTIGE,1 

<030> 

< 120> 
<236> 

2017 

NIL 

REM +++++ DEKLINATIONEN +++++++ 

<16B> 

m 

"ATA 
. *T ft 

SCHLANGE , VOEGEL , GEF IEDERTE.2 

ENDE, LICHTER , DUESTERE , 3 

<248> 

<249> 

2018 

DATA ,,,N,N,N,N,N,N,N,,,N,N,N,N:REM D 


2249 

DATA 

BLICK,BLICKE,UNWUERDIGE,1 

<223> 


ER 

<042> 

2250 

DATA 

FENSTER,FENSTER,FENSTERLOSE,3 

< 022 > 

2020 

2022 

REM +++++ BEST. ARTIKEL +++++++ 

DATA DER,DIE,DAS,DES,DER,DES,DEM,DER, 

< 123> 

2251 

2252 

DATA 

DATA 

TOD,HOERNER,LAUERNDE,1 

RAUCH,WAENDE,DUNSTIGE,1 

<047> 

<058> 


DEM,DEN,DIE,DAS 

< 150> 

2253 

DATA 

KR I EG, KR I EGE , VERFLUCHTE, 1 

<083 > 

2024 

DATA DIE,DER,DEN,DIE 

< 103> 

2254 

DATA 

KLIRREN,HORDEN,METALLENE,3 

<233> 

2030 

REM +++++ ENDSILBEN +++++++ 

<003> 

2255 

DATA 

WAGNIS, GABEN , FINSTERE , 3 

<129> 

2040 

2042 

REM ++-+++ PRAEPOSITIONEN ++++++ 

DATA IN , AUF , NEBEN, UNTER , UEBER, GEGENUE 

<051 > 

2256 

2257 

DATA 

DATA 

LEBEN,GEGNER,TOETLICHE,3 

STEIN,STEINE,FLUESTERNDE,1 

<150> 

<245> 


BER,AN,AUS 

<061 > 

2258 

DATA 

KETTE,KETTEN,SCHWERE,2 

<217> 

2060 

REM +++++ TMP. BESTIMMUNGEN +++ 

<19B> 

2259 

DATA 

FLUSS,FLUESSE,SPIT ZE,1 

<090> 

2064 

DATA JETZ T,NUN,HEUTE,SOEBEN,BALD,GLEI 


2260 

DATA 

WILLE,SCHWERTER,GLAENZENDE,1 

<021 > 


CH 

< 1B1 > 

2261 

DATA 

ROSS, ROESSER, SCHICKSALSHAFTE, 3 

<237> 

2080 

REM +++M-+ KONJUNKTIONEN +++++++ 

<139> 

2262 

DATA 

GASTHAUS , RE I TER, UNBEKANNTE , 3 

<137> 

2082 

DATA WENN,DA,WEIL,DA JA,WEIL NUN EINM 


2263 

DATA 

TAPFERKEIT,FAEHIGKEITEN,EDLE,2 

<087> 


AL, OBGLE ICH, OBWOHL 

<066> 

2264 

DATA 

CROM,GOETTER,VERLORENE,0 

<088> 

2084 

DATA AUCH WENN,WENN AUCH,WAEHREND,SOL 


2265 

DATA 

FALKE,FALKEN,STUERZENDE,1 

< 199> 


ANGE,SOLANBE BIS 

<020> 

2266 

DATA 

CONAN,TEUFEL,HETZENDE,0 

<095> 

2086 

DATA NACHDEM,SEITDEM,EHER ALS,ALS,BEV 


2267 

DATA 

SCHWERT .KATZEN,SCHLEICHENDE,3 

<026> 


OR,JEDESMAL WENN 

<062> 

2268 

DATA 

FREUDE,FREUDEN,STINKENDE,2 

<062> 

2088 

DATA WIE SEHR AUCH,WENN ABER,WENN NUR 


2269 

DATA 

GLITZERN,BESTIEN,BLUTIGE,3 

< 202 > 


.WENN NUR NICHT 

<00ü> 

2270 

DATA 

DRACHE,DRACHEN,GIGANTISCHE,1 

<152> 

2090 

DATA DAMIT,DAMIT NICHT,SOBALD 

<194> 

2271 

DATA 

BLITZ,BL ITZE,GRELLE,1 

<209> 

2100 

REM +++++ EINFACH WORTE ++++++++ 

<054> 

2272 

DATA 

SCHRECKEN , SCHRECKEN , BLUTRUENSTIG 


2102 

DATA "IMMER WIEDER".ANDAUERND,"OHNE U 
NTERLASS","NUR NOCH" 

<060> 

2273 

E,1 

DATA 

MOOR,SUEMPFE,TROPFENDE,3 

<062> 

<129> 

2104 

DATA NIEMALS,SELTSAMERWEISE,MANCHMAL, 


2274 

DATA 

MOND,MONDE,SUECHTIGE,1 

< 141 > 


"WIEDER UND WIEDER" 

<237> 

2275 

DATA 

EBER,MAUERN,WILDE,1 

<151> 

2105 

DATA "ZU KEINER ZEIT","FUER IMMER UND 


2276 

DATA 

RABE,RABEN,PECHSCHWARZE,1 

<187> 


EWIG" 

<095> 

2277 

DATA 

EINSAMKEIT,Z WEIGE,DUMPFE,2 

< 035 > 

2120 

REM +++++ DIVERSE SUBSTANTIVE ++++ 

<161> 

2278 

DATA 

GEHEIMNIS,GEHEIMNISSE,VERGESSENE 


2122 

DATA NICHTS,ALLES,"REIN GAR NICHTS"," 
KAUM ETWAS",NIEMAND,ALLE 

<120> 

2279 

,3 

DATA 

VERLANGEN,WIESEN,EKSTATISCHE,3 

<235> 

< 188> 

2200 

REM +++++ NOMEN,ADJEKTIVE ++++++ 

<250> 

2280 

DATA 

MESSER,MESSER,SCHARFE,3 

<010> 

2201 

DATA MEER,MEERE,WAE5SRIGE,3 

< 115> 

2281 

DATA 

MAUER , MAUERN , STE INERNE, 2 

<107> 

2202 

DATA WALD,WAELDER,GRUENE,1 

< 181 > 

2282 

DATA 

MAGIE,ZAUBEREIEN,ERDFARBENE,2 

<250> 

2203 

DATA HAUS,HAEUSER,BLAUE,3 

<225> 

2283 

DATA 

PEST,KETTEN,STAEHLERNE,2 

<198> 

2204 

DATA MAEDCHEN,MAEDCHEN,HELLE,3 

<040 > 

2284 

DATA 

WAFFE,WAFFEN,VERBORGENE,2 

< 158> 

2205 

DATA JUNGE,JUNGEN,JUNGE,1 

< 11B> 

2285 

DATA 

HUND,HUNDE,REISSENDE,1 

<08B> 

2206 

DATA FRAU,FRAUEN,DUNKLE,2 

<110> 

2286 

DATA 

MONUMENT,KUNSTLEHRER,GERISSENE,3 

<249> 

2207 

DATA TURM,TUERME,DURSTIGE,! 

< 177> 

2287 

DATA 

MALTE."LIPPE ENTERPRISES",BERECH 





100 


SONDERHEFT 26 









C64 


LISTINGS 


TIGTE.0 <120> 

22BS DATA MATTHIAS,MONUMENTE,IRDENE,0 <193> 

2289 DATA STEFAN,EINDRUECKE,GEWALTIGE",0 <241 > 

2290 DATA DIRK,VISIONEN,FARBLOSE,0 <129> 

2291 DATA BAUER,BAUERN,WEICHE,1 <240> 

2292 DATA UEBERMENSCH,GlGANTEN,KNORRIGE,1 <080> 

2293 DATA W AHNS INN, CENTAUREN, ST IERKOEPFI GE 

.1 <172> 

2294 DATA RICHTER,RICHTER,PULSIERENDE,1 <177> 

2295 DATA SONNE,SONNEN,BERSTENDE,2 <013> 

2296 DATA GAL AXIS, GALAXI EN, "STRAHLEND SCHO 

ENE",2 <200> 

2297 DATA WELTENKREIS,FRAGEN,GROESSTE,1 <182> 

2298 DATA IMPULS,IMPULSE,ROTIERENDE,1 <172> 

2299 DATA PULSAR,PULSARE,GRENZENLOSE,1 <172> 

2300 DATA SUPERNOVA,SUPERNOVAE,UNERMESSLIC 

HE,2 <056> 

2301 DATA VAKUUM,FRAGMENTE,ERHEITERTE,3 <113> 

2302 DATA KUGELRAUMER , KUGELRAUMER , WAFFENST 

ARRENDE,1 <076> 

2303 DATA ZYKLUS,ZYKLEN,BARBARISCHE,1 <020> 

2304 DATA SCHMERZ,SCHMERZEN,RUHENDE,1 <132> 

2305 DATA GESCHUETZ.GESCHUETZE.RAUCHENDE,3 <137> 

2306 DATA WALL.WAELLE.MENTALE,1 <090> 

2307 DATA SCHWERTMEISTER,HERAUSFORDERER,RI 

ESIGE,1 <164> 

2308 DATA REVOLTE,REVOLTEN,GEWALTLOSE,2 <173> 

2309 DATA KOMET,KOMETEN,GEFRORENE,1 <172> 

2310 DATA METEOR,METEORE,"HELL GLUEHENDE", 

1 <173> 

2311 DATA GAS,GASE,BETAEUBENDE,3 <147> 

2312 DATA RAUMSCHIFF,RAUMSCHIFFE,STELLARE, 

3 <179> 

2313 DATA STERN,STERNE,DROHENDE,1 <210> 

2314 DATA MASSE,MASSEN,STARRE,2 <246> 

2315 DATA ENERGIE,ENERGIEN,REINE,2 <160> 

2316 DATA ZEIT,ZEITEN,VERGLUEHENDE,2 <044> 

2317 DATA RAUM,RAEUME,ERNEUERTE,1 <050> 

2318 DATA RAUM-ZEIT,GEFUEHLE,FLIESSENDE,2 <060> 

2319 DATA TRAEGHEIT,OBERFLAECHEN,ZERSCHMOL 

ZENE.2 ai3> 

2320 DATA KUGEL,KUGELN,SELTSAME,2 <167» 

2321 DATA MONOLITH,MONOLITHEN,KRISTALLINE, 

1 <049> 

2322 DATA QUADER,QUADER,INTERSTELLARE,3 <0B9> 

2323 DATA QUASAR,QUASARE,ARCHAISCHE,1 <175> 

2324 DATA HERRSCHER,HERRSCHER,FASZINIEREND 

E,1 <072> 

2325 DATA KOSMOS,DAEMPFE,HEISSE,1 <203> 

2326 DATA UNIVERSUM,KREISE,SILBERNE,3 <167> 

2327 DATA JUNGFRAU,JUNGFRAUEN,STILISIERTE, 

2 <107> 

2328 DATA TROPFEN,TROPFEN,TROPFENDE,1 <019> 

2329 DATA MATRIX,MATRIZEN,KUBISCHE,2 <101> 

2330 DATA KALKUEL,KALKUELE,DOGMATISCHE,3 <035> 

2331 DATA EXPERIMENT,EXPERIMENTE,GRAUENHAF 

TE,3 <il3> 

2332 DATA HASELNUSS,HASELNUESSE,ASTRALE,2 <057> 

2333 DATA GESANG,GESAENGE,MEDITATIVE,1 <143> 

2334 DATA DROGE,DROGEN,PSYCHEDELISCHE,2 <006> 

2335 DATA ANGST,AENGSTE,HYSTERISCHE,2 <233> 

2336 DATA SIT AR,GERAEUSCHE,MORBIDE,1 <186> 

2337 DATA ERKENNTNIS,ERKENNTNISSE, INDISCHE 

,3 <097> 

2338 DATA STURM,STUERME,GOETTLICHE,1 <104> 

6000 REM +++++ VERBEN +++++++++++++++ <150> 

6001 DATA BESTAUNT,BESTAUNEN,0 <098> 

6002 DATA ZERFLIESST,ZERFLIESSEN,1 <136> 

6003 DATA RIESELT,RIESELN,1 <252> 

6004 DATA ERSTARRT,ERSTARREN,1 <111> 

6005 DATA ZERBRICHT,ZERBRECHEN,2 <015> 

6006 DATA ZERSCHMETTERT,ZERSCHMETTERN,2 <049> 

6007 DATA TRINKT,TRINKEN,3 <173> 

6008 DATA SCHLAEFT,SCHLAFEN,1 <210> 

6009 DATA WANDERT,WANDERN,1 <026> 

6010 DATA FLIEGT,FLIEGEN,1 <009> 

6011 DATA KAEMPFT,KAEMPFEN,1 <244> 

6012 DATA BEKAEMPFT,BEKAEMPFEN,0 <136> 

6013 DATA ZERFAELLT,ZERFALLEN,1 <172> 

6014 DATA ZERFRISST,ZERFRESSEN,0 <152> 

6015 DATA LACHT,LACHEN,1 <190> 

6016 DATA WINKT,WINKEN,1 <118> 

6017 DATA FLUCHT,FLUCHEN,! <083> 


6018 DATA TOETET,TOETEN,2 <016> 

6019 DATA ENTFLAMMT,ENTFLAMMEN,1 <138> 

6020 DATA STOLPERT,STOLPERN,1 <147> 

6021 DATA KREISCHT,KREISCHEN,1 <052> 

6022 DATA KNURRT,KNURREN,1 <241> 

6023 DATA VERWEHT,VERWEHEN,1 <112> 

6024 DATA BEWEGT,BEWEGEN,0 <221> 

6025 DATA DURCHBOHRT,DURCHBOHREN,0 <054> 

6026 DATA SCHREIT,SCHREIEN,1 <001> 

6027 DATA ERDULDET,ERDULDEN,0 <021> 

6028 DATA FLUECHTET.FLUECHTEN,1 <150> 

6029 DATA ERSCHLAEGT,ERSCHLAGEN,0 <051> 

6030 DATA VERGEHT,VERGEHEN,1 <111> 

6031 DATA KREIST,KREISEN,1 <181>j 

6032 DATA GLUEHT,GLUEHEN,1 <047> 

6033 DATA SCHWEBT,SCHWEBEN,1 <124> 

6034 DATA STEIGT,STEIGEN,1 • <063> 

6035 DATA SCHWANKT,SCHWANKEN,1 <244> 

6036 DATA SINKT,SINKEN,1 <098> 

6037 DATA BEKLAGT,BEKLAGEN,0 <226> 

6038 DATA STUERZT.STUERZEN,1 <027> 

6039 DATA VERLIERT,VERLIEREN,2 <119> 

6040 DATA BEERDIGT,BEERDIGEN,0 <249> 

6041 DATA VERWUNDERT,VERWUNDERN,0 <028> 

6042 DATA FORDERT,FORDERN,2 <245> 

6043 DATA BEZWINGT,BEZWINGEN,0 <061> 

6044 DATA FUEHRT,FUEHREN,2 <178> 

6045 DATA ZWEIFELT,ZWEIFELN,1 <171> 

6046 DATA BEGEHRT,BEGEHREN,0 <131> 

6047 DATA VERWANDELT,VERWANDELN,0 <023> 

6048 DATA ERSCHAFFT,ERSCHAFFEN,0 <167> 

6049 DATA TEILT,TEILEN,0 <177> 

6050 DATA VERMODERT,VERMODERN,1 <158> 

6051 DATA VERSINKT,VERSINKEN.l <120> 

6052 DATA BESCHWOERT,BESCHWOEREN,0 <040> 

6053 DATA FUNKELT,FUNKELN,1 <046> 

6054 DATA DUFTET,DUFTEN,1 <051> 

6055 DATA GEFRIERT,GEFRIEREN,1 <221> 

6056 DATA ERFRIERT,ERFRIEREN,1 <033> 

6057 DATA VERLAESST,VERLASSEN,0 <1B9> 

6ß32 DATA ZERSPLITTERT,ZERSPLITTERN,1 <062> 

öBSV DATA ZERSTICHT,ZERSTECHEN,0 <157> 

6060 DATA ZERREISST,ZERREISSEN,0 <068> 

6061 DATA VERBRENNT,VERBRENNEN,2 <136> 

6062 DATA OPFERT,OPFERN,2 <109> 

6063 DATA ZERFETZT,ZERFETZEN,0 <065> 

6064 DATA PRAHLT,PRAHLEN,1 <174> 

6065 DATA BEENDET,BEENDEN,0 <034> 

6066 DATA ERLANGT,ERLANGEN,0 <153> 

6067 DATA ERBLICKT,ERBLICKEN,0 <183> 

6068 DATA VERFOLGT.VERFOLGEN,0 <107> 

6069 DATA SEUFZT,SEUFZEN,1 <041> 

6070 DATA SPUERT,SPUEREN,0 <201> 

6071 DATA VERMEIDET,VERMEIDEND <036> 

6072 DATA SINGT,SINGEN,1 <069> 

6073 DATA BESINGT,BESINGEN,0 <148> 

6074 DATA BEWEINT,BEWEINEN,0 <155> 

6075 DATA VERGISST,VERGESSEN,3 <066> 

6076 DATA BERUEHRT,BERUEHREN,0 <004> 

6077 DATA ERKLINGT,ERKLINGEN,1 <109> 

6078 DATA VERGLUEHT,VERGLUEHEN,1 <077> 

6079 DATA LEBT,LE?EN,1 <226> 

6080 DATA SUCHT,SUCHEN,0 <213> 

6081 DATA VERKUENDET,VERKUENDEN,0 <189> 

6082 DATA ERWACHT,ERWACHEN,1 <113> 

6083 DATA GLAENZT,GLAENZEN,1 <126> 

6084 DATA HUETET,HUETEN,0 <079> 

6085 DATA BETRACHTET,BETRACHTEN,0 <152> 

6086 DATA LAECHELT,LAECHELN,1 <222> 

6087 DATA ROTIERT,ROTIEREN,1 <062> 

6088 DATA DURCHWANDERT,DURCHWANDERN,0 <061> 

6089 DATA SCHIMMERT,SCHIMMERN,1 <137> 

6090 DATA ANTWORTET,ANTWORTEN,! <242> 


© 64'er 


Listing. »Lyric 3.0« (Schluß) 
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Dem Kkmg auf der Spur 




Wissen Sie eigentlich, welche Klangvielfalt Sie 
Ihrem C64 entlocken können; wie man Musik 
oder Geräusche programmiert? Wir bringen Ih¬ 
nen eine ausführliche und leicht verständliche 
Einführung zu diesem interessanten Thema. 

Z ur Erzeugung von Geräuschen und Musik ist der C64 
mit einem leistungsfähigen Baustein ausgestattet. Er 
trägt die Bezeichnung 6581 und soll hier im folgenden 
SID genannt werden. SID steht für »Sound Interface Devi¬ 
ce«, was man mit »Klang-Schnittstellen-Baustein« überset¬ 
zen könnte. Der SID ist eigentlich ein kleiner Synthesizer, 
der dreistimmige Melodien spielen oder drei unabhängige 
Geräusche gleichzeitig erzeugen kann oder auch eine 
Kombination von beiden, zum Beispiel eine zweistimmige 
Melodie oder ein Geräusch. Wie man ihn dafür program¬ 
miert, soll hier gezeigt werden. Da das Standard-Basic des 
C64 keine speziellen Befehle zu diesem Zweck vorsieht, 
muß man sich näher mit dem inneren Aufbau des SID be¬ 
fassen, um ihn dann mit PEEK- und POKE-Befehlen zu 
steuern. Dieser gezwungenermaßen etwas unelegante 
Programmierstil hat aber wenigstens einen Vorteil für den¬ 
jenigen, der in Maschinensprache programmieren kann 
oder es lernen will. Er kann nämlich die PEEK- und POKE- 
Befehle direkt in die Assemblersprache übernehmen. Stür¬ 
zen wir uns also gleich mittenhinein in die SID-Program- 
mierung (in Basic). 

Beim SID wird ein Klang durch folgende Parameter (= 
Steuergrößen) beeinflußt: 

1) Lautstärke 

2) Hüllkurve Sie steuert den zeitlichen Lautstärken¬ 
verlauf zum Beispiel eines ausklingen¬ 
den Tones. 

3) Kurvenform Sie ist für den Klangcharakter des Tones 
verantwortlich. 

4) Frequenz Sie entspricht der Tonhöhe. 


Mit Einzelheiten und mit weiteren Parametern zur Klang- 
steuerung werden wir uns gleich befassen. Zunächst wol¬ 
len wir aber einmal einen Ton erzeugen, zum Beispiel um 
zu hören, ob unser Monitor oder Fernseher, der die Töne 
wiedergeben muß, richtig eingestellt ist (Perfektionisten 
schließen den C64 über die Audio/Video-Buchse und ein 
normales DIN-Überspielkabel an die HiFi-Anlage an). 

Der erste Ton 


POKE 54296,15 
POKE 54278,240 
POKE 54273,67 


POKE 54276,17 


stellt den SID auf maximale Lautstärke 
wählt eine einfache Hüllkurve, 
stellt eine Frequenz ein 
(zirka 1000 Hz). 

wählt eine sogenannte Dreieckskurve 
und schaltet zugleich den Ton ein 
(muß immer als Letztes geschehen!). 
Jetzt müßte ein Ton hörbar sein, der ähnlich wie bei ei¬ 
nem Fernseh-Testbild klingt. 

POKE 54276,16 schaltet den Ton wieder ab. 

Der gleiche Ton mit schärferem Klang gefällig? 


POKE 54276,33 wählt eine »Sägezahnkurve«. Diese 
klingt heller und schärfer als das 
Dreieck. 


Doch anstatt mit geheimnisvollen POKEs zu arbeiten, 
sollten wir uns doch besser systematisch mit dem SID be¬ 
fassen. Wer aber nur schnell einen Klangeffekt für ein eige¬ 
nes Programm benötigt und wen die Einzelheiten des SID 
nicht so sehr interessieren, der kann den systematischen 
Teil überspringen und gleich bei »Klangeffekte zum Abtip¬ 
pen« weiterlesen. 

Unter einem Register versteht man in der Computertech¬ 
nik einen Speicherplatz, der mit einer besonderen Funk¬ 
tion gekoppelt ist. Diese Speicherplätze sind also nicht da- 
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zu da, um Daten darin abzulegen, sondern um eine Funk¬ 
tion auszulösen oder um Informationen über den Zustand 
eines Bausteins zu bekommen. Man unterscheidet dem¬ 
nach Schreibregister und Leseregister. 

Der SID verfügt insgesamt über 25 Schreib- und Lesere¬ 
gister. Auf Bild 1 sind diese in grafischer Form dargestellt. 
Der SID hat die Basisadresse: 

S = 54272 (dezimal) oder $D400 (hexadezimal) 

Unter dieser und den 28 folgenden Adressen können die 
Register des SID angesprochen werden. Wir werden in Zu¬ 
kunft Registeradressen wie in Bild 1 immer in der Form S+n 
(n = 0 bis 28) angeben, weil diese Schreibweise prägnan¬ 
ter als eine fünfstellige Zahl ist. Es ist empfehlenswert, sich 
auch in Programmen an diese Vereinbarung zu halten. 

Das Registerschema gliedert sich in drei Blöcke: 
Dererste Block ist in Wirklichkeit dreimal vorhanden, für je¬ 
de Stimme einmal. Die sieben Register dieser Blöcke ha¬ 
ben also für die drei Stimmen unterschiedliche Adressen, 
wie links im Schema auch angegeben ist. 

Ein Instrument mit 29 Registern 


Der zweite Block (S+21 bis S+24) dient hauptsächlich 
zur zusätzlichen Klangbeeinflussung durch einen Filter. 
Den Filter werden wir aber erst später behandeln. Aus die¬ 
sem Block interessiert zunächst nur die rechte Hälfte des 
Registers S+24, das für die Lautstärke zuständig ist. 

Der dritte Block (S+25 bis S+28) besteht aus vier soge¬ 
nannten »Nur-Lese-Registern«. Aus diesen Registern kann 
nur gelesen werden, Schreibzugriffe bleiben wirkungslos. 
Auch diese Register, die Spezialeffekten dienen, interes¬ 
sieren uns zunächst noch nicht. 

Ein Register besteht, wie jeder andere Speicherplatz 
beim C64 auch, aus einem Byte, beziehungsweise 8 Bit. 
Man sieht, daß einige Register noch in Felder unterteilt 
sind. Bei diesen Registern haben einzelne Bits oder Bit¬ 
gruppen unterschiedliche Bedeutung. Die schraffierten 
Bereiche kennzeichnen Bits, die keine Funktion im SID ha¬ 
ben. Wir werden bald sehen, wie man einzelne Bits inner¬ 
halb eines Byte gezielt ansprechen kann. Nun zu den Regi¬ 
stern im einzelnen: Es werden beim ersten Block stellver¬ 
tretend die Register der Stimme 1 (S+0 bis S+6) beschrie¬ 
ben. Die Register für Stimme 2 (S+7 bis S+13) und Stimme 
3 (S+14 bis S+20) sind in ihrer Funktion identisch. 

Ab hier ist es praktisch, wenn man bei der Lektüre das 
kleine Programm aus Listing 1 im Computer hat, denn dann 
kann man die Wirkung der Parameter in den SID-Registern 
gleich ausprobieren. Die Parameter stehen gut les- und edi¬ 
tierbar in den DATA-Zeilen. Das Programm erzeugt nach 
dem Starten einen Ton bei einem beliebigen Tastendruck. 
Tasten mit Auto-Repeat-Funktion, wie zum Beispiel die 
Space-Taste, erzeugen einen Dauerton. Abgebrochen wird 
das Programm mit der RUN/STOP-Taste. Der letzte Para¬ 
meter steuert übrigens die Tonlänge durch eine einfache 
Verzögerungsschleife. 

Frequenz S + 0 und S + l 


Die Frequenz kann beim SID auf 16 Bit genau angege¬ 
ben werden. Eine 16-Bit-Zahl kann Werte zwischen 0 und 
65535 annehmen. Dieser Wert entspricht allerdings nicht 
der Frequenz in Hz (Hertz = Schwingungen pro Sekunde). 
Der SID-Wert F zu einer gegebenen Frequenz in Hz errech¬ 
net sich nach: 

F = 17.0284 * Frequenz 

Der SID-Wert F zum sogenannten Kammerton a mit 440 
Hz beträgt also (ganzzahlig gerundet): 

F = 17.0284 * 440 = 7492 


Die höchste vom SID erzeugbare Frequenz beträgt dann 
(gerundet): 

65535 / 17.0284 * 3849 (Hz) 

Zum Experimentieren mit Klangeffekten interessiert uns 
die genaue Frequenz eigentlich gar nicht, für korrekt ge¬ 
stimmte Tonleitern müssen wir sie dagegen kennen. Zu¬ 
nächst wollen wir aber erfahren, wie man den SID mit dem 
Wert F (Frequenz) programmiert. Diese im Dezimalsystem 
maximal fünfstellige Zahl wird im Binärsystem durch 16 Bit 
dargestellt. Da es sich beim C64 um einen 8-Bit-Mikro- 
computer handelt, müssen wir diesen Wert in zwei 8-Bit- 
Hälften, das sogenannte niederwertige und höherwertige 
Byte, kurz Low-Byte und High-Byte zerlegen. Hier zwei 
»Rezepte«: 

1. Methode (Standard): 

HI = INT(F/256) 

L0 = F-256*HI 

Das ist nichts anderes als eine Division durch 256 mit 
Rest. Hl ist dabei der Quotient und LO der Divisionsrest. 
Die Werte LO und Hl sind beide Byte-Werte und liegen da¬ 
mit im Bereich 0 bis 255. Im Fall F=7492 (entsprechend 440 
Hz) ergibt sich zum Beispiel: 

HI = 29 und L0 = 68 

2. Methode (mit Einschränkungen, aber schneller): 

HI = F/256 
L0 = F AND 255 

Die INT-Funktion zur Berechnung von Hl wurde hier ge¬ 
spart. Hl kann hier noch Nachkommastellen haben; diese 
werden aber später von dem noch folgenden POKE-Befehl 
abgeschnitten. Die Berechnung von LO funktioniert hier 
hur bei F-Werten im Bereich 0 bis 32767. Die zweite Metho¬ 
de ist nur dann zu empfehlen, wenn es auf Geschwindigkeit 
ankommt. 

Mit den Werten LO und Hl müssen wir dann die beiden 
Regisier S+0 und S+1 besetzen: 

POKE S+0 , L0 
P0KE S+l,HI 

Man kann die Wirkungsweise des High- und Low-Bytes 
auch als Grob- und Feineinstellung auffassen. Oft genügt 
für einen Klang eine grobe Frequenzsteuerung. Man 
braucht dann nur das High-Byte zu berücksichtigen und 
kann das Low-Byte ein für allemal zum Beispiel auf 0 set¬ 
zen. 

Pulsweite S+2 und S+3 


Der Parameter »Pulsweite« ist nur wirksam, wenn als Kur¬ 
venform das Rechteck gewählt wurde. Die Kurvenformen 
sind in Bild 1 bei Register S+4 grafisch dargestellt und wer¬ 
den im nächsten Abschnitt besprochen. Das Rechteck ist 
eine Kurvenform, die nur zwischen zwei Werten hin- und 
herspringt. Ist der obere Wert genauso lang wie der untere, 
so spricht man von einer symmetrischen Rechteckkurve. 
Das Verhältnis zwischen der Länge des oberen und des un¬ 
teren Wertes kann mit dem Parameter »Pulsweite«, im fol¬ 
genden P genannt, gesteuert werden. P kann Werte von 0 
bis 4095 annehmen und wirkt sich auf die Klangfarbe des 
Tones aus. Das symmetrische Rechteck, das man mit P = 
2048 erhält, klingt verhältnismäßig hohl und wird als typi¬ 
scher Rechteckkiang bezeichnet. Entfernt man sich mit P 
von 2048 in Richtung 0 oder 4095, so wird der Klang zuneh¬ 
mend heller und später schnarrend oder zirpend. Maßgeb¬ 
lich ist hierbei nur der Abstand von P zum Mittelwert 2048. 
So klingt zum Beispiel P = 2048+500 genauso wie P = 
2048-500. Bei P=0 und P=4095 wird .kein Ton mehr er¬ 
zeugt. 

P ist eine 12-Bit-Größe und muß wie F in ein Low- und ein 
High-Byte zerlegt werden. Beim High-Byte können dabei 
nurdie unteren vier Bit gesetzt sein. Zu diesem Zweck kann 
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man ohne Einschränkungen die schon beschriebene Me¬ 
thode 2 anwenden: 

HI = P/256 
LO = P AND 255 
POKE S+2,LO 
POKE S+3»HI 

Steuerregister S+4 


Dieses Register ist für mehrere Funktionen gleichzeitig 
zuständig: 

- Die Wahl der Kurvenform 

- Ein- und Ausschalten des Tones 

- Spezialeffekte Ringmodulation und Synchronisation 

- Reset der Stimme 

Zunächst einmal eine Tabelle mit den Funktionen im ein¬ 
zelnen: 


1) Rechteck wählen und Ton einschalten 

Bits: 6 und 0 

= Byte-Wert: 216 + 1 =65 
POKE S+4,65 

2) Ton abschalten, Rechteck gewählt lassen 

Bits: 6 

Byte-Wert: 216 = 64 

POKE S+4,64 

Anmerkung: Beim Abschalten eines Tons sollte man im¬ 
mer die zuletzt gewählte Kurvenform gewählt lassen, damit 
der Ton ausklingen kann. Mit POKE S+4,0 (alle Bits rück- 
setzen) wird der Ton abrupt abgebrochen. 

3) Dreieck mit Ringmodulation wählen, Ton einschalten 

Bits: 4, 2 und 0 

Byte-Wert: 214 + 2t2 + 2t0 = 16 + 4 + 1 =21 

POKE S+4,21 

Die Kurvenform 


Bit 

Dezimal¬ 

wert 

(POKE...) 

Funktion 

0 

1 

GATE schaltet Ton ein und aus 

1 

2 

SYNC Synchronisation (Spezial¬ 
effekt) 

2 

4 

RING Ringmodulation (Spezialeffekt) 

3 

8 

TEST Reset 

4 

16 

wählt Dreieckskurve 

5 

32 

wählt Sägezahnkurve 

6 

64 

wählt Rechteckkurve 

7 

128 

wählt Rauschen 


Mit einem POKE an die Adresse S+4 werden immer alle 
8 Bit gleichzeitig beeinflußt. Einen Befehl zum Setzen oder 
Löschen einzelner Bits gibt es nicht. Man muß sich daher 
über die gewünschten Werte aller 8 Bits im klaren sein, 
auch wenn man nur ein Bit verändern will. Um den richtigen 
POKE-Wert zu erhalten, müssen die Wertigkeiten der Bits, 
die man setzen will, addiert werden. Die folgenden drei Bei¬ 
spiele sollen zur Veranschaulichung dienen: 


Sie bestimmt die Klangfarbe des Tones. Am vielseitigsten 
ist das schon besprochene Rechteck, weil man es durch 
die Pulsweite reichhaltig gestalten kann. Der Sägezahn 
klingt noch etwas heller und strahlender als das Recht¬ 
eck. Er eignet sich besonders gut zur Imitation mancher In¬ 
strumentenklänge wie Streicher und Blechbläser. Das 
Dreieck klingt dagegen weich und dumpf und ist bei tiefen 
Tönen leider leise. Der Klang ist aber bei hohen Tönen sehr 
angenehm. Rauschen eignet sich für Effekte wie Wind, Dü¬ 
senlärm, Schüsse, Explosionen und Schlagzeugklänge. 
Das Rauschen hat zwar keine feste Tonhöhe, doch sein 
Klangcharakter wird durch den Frequenzparameter ent¬ 
scheidend beeinflußt. 

Ind6;v. man zwei Kurvenform-Bits gleichzeitig setzt, kann 
man durch Kombination mehrerer Kurvenformen weitere 
Klänge erzeugen. Dabei werden die Einzelklänge nicht et¬ 
wa einfach gemischt, sondern andere Kurvenformen er¬ 
zeugt. Rauschen läßt sich allerdings nicht mit einer ande¬ 
ren Kurvenform kombinieren. Auch die Kombination von 
drei Kurvenformen ist unbrauchbar. Sie liefert einen leisen, 
fast im Rauschen untergehenden Klang. Es bleiben also 
drei Kombinationen, die sehr interessant klingen: 


Die Register des SID 8asisadresse desSIO: S = 54272 

Adressen: 

Stimme 1 Stimme 2 Stimme 3 
S+O S+7 S+14 

S + 1 S + 8 S + 15 

S + 2 S + 9 S +16 

S + 3 S + 10 S + 17 

S + 4 S + 11 S + 18 

S + 5 S + 12 S + 18 

S+6 S + 13 S + 20 


S + 21 
S + 22 
S + 23 
S + 24 
S + 25 
S + 26 
S + 27 
S + 28 



Filterfrequenz-high 


Resonanz 


S1 «III Hoch Bond 


TUT 


FBI« Ei Ffflof 3 Filter 3 Filter 1 


Lautstaerke 


Potentiometer X 


Potentiometer Y 


Oszillator 3 


Huellkurve 3 


Bild 1. Alle Register des 
Sound-Chip auf einen Blick 
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POKE-Wert (An/Aus) 

Rechteck - Sägezahn 97/96 

Rechteck - Dreieck 81/80 

Sägezahn - Dreieck 49/48 

Der Klangcharakter variiert stark von tiefen zu hohen Tö¬ 
nen. Die letzte Kombination liefert nur bei sehr tiefen Tönen 
gute Resultate. Der Klang der ersten beiden Kombinatio¬ 
nen hängt natürlich auch von der Pulsweite P ab. 

Die Spezialeffekte 


Sie sollen hier nur am Rande erwähnt werden. Wird das 
SYNC-BIT für Stimme 1 gesetzt (Bit 1 in Register S+4) so 
kann Stimme 1 nicht mehr frei schwingen, sondern wird von 
Stimme 3 mit beeinflußt, man sagt hier »synchronisiert«. 
Auch das Ring-Bit bewirkt, daß Stimme 3 die Stimme 1 be¬ 
einflußt. Diese sogenannte Ringmodulation wirkt allerdings 
nur auf die Dreieckskurve. Der Effekt ist daher nur hörbar, 
wenn das Ring-Bit (Bit 2) zusammen mit Bit 4 für Dreieck 
gesetzt wird. Beide Effekte liefern ähnliche Resultate. Es 
lassen sich unter anderem metallische und glockenähnli¬ 
che Klänge erzeugen. Die Stimme 3 braucht dabei nicht 
über ihr GATE-Bit eingeschaltet werden. Maßgeblich ist nur 
die Frequenz von Stimme 3 (Register S+14 und S+15). 

Nun besitzen natürlich auch Stimme 2 und 3 je ein 
SYNC- und ein RING-Bit. Die drei Stimmen steuern sich da¬ 
bei nach dem Schema: 

Stimme 1 ► Stimme 2 

Stimme 2 ► Stimme 3 

Stimme 3 -► Stimme 1 

Das TEST-Bit wird man wahrscheinlich nie benötigen. Es 
übt eine lokale Reset-Funktion auf die jeweilige Stimme 
aus. Solange es gesetzt ist, ist nichts hörbar, unabhängig 
von den anderen Bits. Wenn man allerdings versucht, 
Rauschen mit einer anderen Kurvenform zu kombinieren, 
kann es passieren, daß die betroffene Stimme gewisserma¬ 
ßen »abstürzt« und nichts mehr von sich gibt. Man kann sie 
dann mit einem gezielten Reset über das TEST-Bit wieder 
zum Leben erwecken. 

Die Hüllkurven S+5 und S+6 


Wenn eine Stimme über das GATE-Bit eingeschaltet wird, 
dann folgt ihr zeitlicher Lautstärkenverlauf einer program¬ 
mierbaren Hüllkurve. Die Hüllkurve bestimmt unter ande¬ 
rem, ob der Ton hart oder weich einsetzt und ob er schnell 
oder langsam ausklingt. Der Name kommt von den vier 
Phasen, die die Hüllkurve durchläuft. Jeder Phase ist dabei 
ein Parameter zugeordnet. 

Attack Die Attack-Phase wird durch das Setzen des 
GATE-Bits eingeleitet. Der Pegel steigt dabei von 
0 bis Maximum (Lautstärkeregister) an. Die Zeit 
für diesen Anstieg ist über den Parameter A in 16 
nicht-linearen Stufen von 2 ms bis 8 s einstellbar. 
Eine kurze Attack-Phase bewirkt einen unmittel¬ 
baren und harten Toneinsatz wie bei Schlag¬ 
oder Zupfinstrumenten. Eine mittlere Attack-Zeit 
ist typisch für Bläser- und Streicherklänge, und 
mit einer langen Attack-Zeit kann man einen Ton 
wie am Mischpult langsam einblenden. 

Decay Nachdem der Maximalwert erreicht ist, fällt der 
Pegel in der Decay-Phase bis auf den Sustain- 
Pegel ab. Die Zeit dazu ist mit dem Parameter D 
in 16 nicht-linearen Stufen von 6 ms bis 24 s ein¬ 
stellbar. 

Sustain nennt man die Phase nach dem Pegelabfall in 
der Decay-Phase. Der Ton klingt dann solange 



Bild 2. Hier sehen Sie, wie sich unterschiedliche Werte für 
ADSR auf die Hüllkurve auswirken 


auf dem Sustain-Pegel weiter, bis das GATE-Bit 
zurückgesetzt wird. Der Parameter SU bestimmt 
hier also keine Zeit, sondern einen Pegel und 
zwar in 16 linearen Stufen von Null bis Maximum. 

Release Beim Rücksetzen des GATE-Bits wird der Ton 
nicht einfach abgeschaltet, sondern nimmt in der 
Release-Phase gleichmäßig vom Sustain-Pegel 
bis nach Null ab. Die Zeit dazu ist in der gleichen 
Abstufung wie die Release-Zeit über den Para¬ 
meter R einstellbar. 


Sonderfälle 


Wenn das GATE-Bit bereits vor Erreichen der Sustain-Pha- 
se rückgesetzt wird, dann startet die Release-Phase mit 
dem aktuellen Pegel der Hüllkurve. Auf diese Weise erge¬ 
ben sich: 

a) Attack-Decay-Release-Zyklen ADR oder gar nur 

b) Attack-Release-Zyklen AR 

Bei einem Sustainpegel von Null sind Decay und Relea¬ 
se funktionell gleichwertig (9. Beispiel in Bild 2). Bei einem 
maximalen Sustain-Pegel entfällt die Decay-Phase (Attack- 
Sustain-Release-Zyklus ASR, 1. Beispiel in Bild 2). 

Die Parameter A, D, SU und R sind 4-Bit-Werte. Jeweils 
zwei von ihnen werden wie folgt in ein Register gepackt: 
POKE S+5,16*A+D 
POKE S+6,16*SU+R 

Bild 3 zeigt einige Hüllkurvenbeispiele. 
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Filter, Register S+21 bis S+24 


Der Filter bietet neben der Wahl der Kurvenform eine wei¬ 
tere Möglichkeit zur Klangbeeinflussung. Im Gegensatz zu 
den vorher beschriebenen Parametern muß man sich aber 
nicht um den Filter kümmern, da er abschaltbar ist und weil 
der SID auch ohne Filter reichhaltige Klänge erzeugen 
kann. Um die Wirkungsweise eines Filters zu verstehen, 
muß man sich einen Klang aus mehreren sogenannten Si¬ 
nustönen zusammengesetzt denken, dem Grundton und 
den Obertönen. Sinustöne sind gewissermaßen die nicht 



Bild 3. Einige ADSR-Werte und die dazugehörigen 
Hüllkurven 


mehr weiter zerlegbaren Atome in der Akustik. Ein reiner 
Sinuston klingt dumpf und ohne charakteristische Fär¬ 
bung. Die vom SID erzeugte Dreiecksschwingung kommt 
vom Klang her einem Sinuston recht nahe. Die anderen 
Kurvenformen verdanken ihren helleren Klang einem reich¬ 
haltigeren Obertonspektrum (= Folge von Obertönen). 
Und dieses Obertonspektrum kann man mit dem Filter ver¬ 
ändern. Der Filter im SID kennt dazu drei Betriebsarten, die 
über die Bits 4, 5 und 6 in Register S+24 gewählt werden: 
Tiefpaß Frequenzen (Obertöne) oberhalb der in den Re¬ 
gistern S+21 und S+22 einstellbaren Filterfre¬ 
quenz werden abgeschwächt, und zwar um so 
mehr, je höher diese Frequenzen sind. Der Ge¬ 
samtklang wird dadurch dunkler und weicher. 


Hochpaß Es werden die Frequenzen abgeschwächt, die 
unterhalb der Filterfrequenz liegen. Höhere Fre¬ 
quenzen werden ungehindert durchgelassen. 
Mit einem Hochpaß kann man den Grundton ei¬ 
nes Klanges abschwächen. Seine Gesamtzu¬ 
sammensetzung verschiebt sich dann zugun¬ 
sten der Obertöne. Der Klang wird dabei dünner 
und heller. 

Bandpaß Dieser Filtermodus schwächt Frequenzen auf 
beiden Seiten der Filterfrequenz ab. Der Klang 
wird dabei, wie man fast erwarten kann, etwas 
dürftig, sofern man nicht maximale Resonanz 
(siehe weiter unten) einstellt. 

Filterfrequenz 
(Register S+22 und S+23) 


Die Filterfrequenz kann auf 11 Bit genau eingestellt wer¬ 
den. Dabei kann man aber die drei niederwertigen Bits in 
Register S+21 unberücksichtigt lassen, da ihr Einfluß prak¬ 
tisch unhörbar ist. 

Resonanz und Stimmen-Wnhlschalter 
(Register S+23) 


Über den 4-Bit-Parameter Resonanz kann ein gefilterter 
Klang effektvoller gestaltet werden. Bei großer Resonanz 
(der Maximalwert ist 15) werden Frequenzanteile in der Ge¬ 
gend der Filterfrequenz verstärkt. Die sonstigen abschwä¬ 
chenden Eigenschaften von Tief- und Hoch- und Bandpaß 
bleiben dr.bei erhalten. 

Über die Bits 0, 1 und 2 desselben Registers kann man 
für jede der drei SID-Stimmen unabhängig wählen, ob sie 
gefiltert oder ungefiltert erklingen soll. Ist zum Beispiel Bit 
0 gesetzt, so wird Stimme 1 gefiltert. Das Bit 3, Filter Ex, 
steuert die Verarbeitung einer von außen zuführbaren Si¬ 
gnalquelle, zum Beispiel eines zweiten SID. 

Filtermodus und Lautstärke 
(Register S+24) 


Die Lautstärkeneinstellung haben wir schon kennenge¬ 
lernt. Man wird sie meistens auf ihren Maximalwert 15 stel¬ 
len, weil dann der Rauschabstand und damit die Klangqua¬ 
lität am besten ist. Durch Setzen der Bits 4,5 und 6 wird die 
Betriebsart des Filters, Tief-, Band- oder Hochpaß gewählt. 
Die Betriebsarten sind uneingeschränkt kombinierbar. Mit 
Bit 7 (S3 Aus) kann man die Stimme 3 unhörbar machen. 
Der Sinn dieser Funktion wird in folgendem Abschnitt klar. 

Ein Beispiel zur Filterprogrammierung: 

Stimme 1 soll mit maximaler Resonanz durch den Tiefpaß¬ 
filter geschickt werden: 

FF = 50 Filterfrequenz (nur High-Byte) 

FR = 24l (=15*16 für Resonanz +1 für Bit 1) 

ML = 31 (=16 für Bit 4 + 15 für Lautstärke) 

POKE S+22, FF 
POKE S+23 > FR 
POKE S+24,ML 

Die Leseregisfer S+25 bis S+28 


Die Register S+25 und S+26 haben mit der Klangpro¬ 
grammierung nichts zu tun. Über sie können die Wert 
zweier an Joystick-Ports angeschlossener Potentiometer 
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C64 


MUSIK 


Register 

A 

S+5 

D 

S+5 

SU 

S+6 

R 

S+6 

C 

S+4 

P 

S+2 

S+3 

F 

S 

S+1 

FF 

S+22 

FR 

S+23 

ML 

S+24 

M 

Glöckchen 

0 

10 

0 

10 

16 

X 

40000 

X 

0 

15 

100 

Oboe 

8 

7 

10 

8 

64 

250 

7500 

X 

0 

15 

500 

Fagott 

8 

7 

10 

8 

64 

250 

2500 

X 

0 

15 

750 

Zungenpfeife 

8 

0 

15 

10 

48 

X 

400 

X 

0 

15 

1000 

Banjo 

0 

8 

0 

8 

32 

X 

7500 

50 

241 

111 

30 

Stahl 

0 

0 

15 

12 

96 

2044 

30000 

X 

0 

15 

100 

Feder 

0 

8 

0 

9 

32 

X 

750 

X 

0 

15 

35 

Preßlufthammer 

0 

0 

15 

10 

80 

2100 

200 

X 

0 

15 

2000 

Schuß 

0 

8 

0 

10 

128 

X 

10000 

X 

0 

15 

50 

Starkstrom 

0 

0 

15 

0 

128 

X 

100 

X 

0 

15 

2000 

Düsenflugzeug 

0 

0 

15 

13 

128 

X 

3000 

50 

241 

31 

3000 

Rakete 

0 

0 

15 

15 

128 

X 

1000 

10 

241 

31 

3000 


x = don’t care (Parameter muß nicht eingestellt werden) 


Tabelle 1. Einige Beispiel-Effekte für Listing 1. Die Parameter müssen in den Zeilen 320 bis 390 verändert werden. 


(Paddies) abgefragt werden. Interessant sind die Register 
S+27 und S+28: 

Aus S+27 kann man den Signalverlauf von Stimme 3 in 
Form von Byte-Werten lesen. Mit folgendem kleinen Pro¬ 
gramm kann man diesen Signalverlauf sogar sichtbar ma¬ 
chen: 

10 S=54272 

20 POKE S+l4,10 :REM F LOW 

30 POKE S+15,0 :REM F HIGH 

40 POKE S+18,16 :REM DREIECK 

50 PRINT TAB(PEEKj;S+27)/7) GOTO 50 

Hier sollte man einmal ein wenig mit den Parametern in 
Zeile 20-40 experimentieren. 

Auf die gleiche Weise kann man aus Register S+28 den 
Hüllkurvenverlauf von Stimme 3 lesen. 


oder ihre Hüllkurve anderweitig verwendet. Man kann sie 
dann, wie schon erwähnt, über Bit 7 in Register S+24 aus¬ 
schalten. 

Klangeffekte zum Abtippen 


Nach diesem systematischen Teil folgen noch Einstellun¬ 
gen. Tabelle 1 enthält einige Parametersätze für Klänge, die 
der SID ohne großen Programmieraufwand erzeugen 
kann. Die Klangbezeichnungen wollen die Effekte nur sub¬ 
jektiv beschreiben und sind natürlich nicht zu wörtlich zu 
nehmen. Man muß nun lediglich die Werte einer Zeile in die 
in du-. Kopfzeile angegebenen SID-Register schreiben, das 
GATE-BIT setzen und nach einiger Zeit zurücksetzen. Der 


Fest eingestellt: 
Register 


FF 

S+22 


FR 

S+23 


ML 

S+24 


15 


Register 

A 

S+5 

D 

S+5 

SU 

S+6 

R 

S+6 

C 

S+4 

P 

S+2 

S+3 

F 

S 

S+1 

G 

N 

M 

Telefon 

0 

10 

0 

10 

16 

X 

16000 

1.33 

2 

25 

Laserkanone 

0 

0 

15 

0 

64 

1000 

30000 

0.85 

10 

1 

Take-Off 

0 

0 

15 

15 

128 

X 

500 

1.004 

1000 

1 

Turbine 

0 

0 

15 

15 

96 

2044 

20000 

1.001 

460 

1 

Trommelwirbel 

0 

5 

2 

9 

128 

X 

20000 

1 

2 

30 

Maschinengewehr 

0 

5 

2 

9 

128 

X 

12000 

0.7 

3 

30 


x = don't care (Parameter muß nicht eingestellt werden) 


Tabelle 2. Einige Beispiel-Effekte für Listing 2. Die Parameter müssen in den Zeilen 420 bis 480 verändert werden. 


100 S=54272 

110 POKE S+19,16+11+11 :REM A D 
120 POKE S+20,16*8 +11 :REM S R ' 

130 POKE S+18,1 :REM GATE 0N 

140 F0R 1=1 T0 50 

150 PRINT TAB(PEEK(S+28)/7 );" * " 

160 NEXT I 

170 POKE S+18,0:REM 

GATE OFF 

180 F0R 1=1 TO 50 

190 PRINT TAB(PEEK(S+28)/7);" * " 

200 NEXT I 

Diese Werteverläufe sind besonders zum Modulieren an¬ 
derer Stimmen geeignet. Normalerweise möchte man 
Stimme 3 dann nicht hören, wenn man ihren Signalverlauf 


Parameter M ist übrigens kein SID-Parameter, sondern soll 
eine Verzögerungsschleife steuern, die die Zeit zwischen 
GATE ON und GATE OFF bestimmt. Parameter M bezieht 
sich auf das Programm in Listing 1, das beim Experimentie¬ 
ren Hilfestellung leisten soll. Im DATA-Teil ab Zeile 320 sind 
die Parameter aus Tabelle 1 einzusetzen und zwar genau 
in der gleichen Reihenfolge. Das Programm belegt nach 
dem Start den SID mit den Parametern aus den DATA- 
Zeilen und wartet auf einen beliebigen Tastendruck, der 
dann den Klangeffekt auslöst. Man versuche es auch ein¬ 
mal mit den Tasten, die eine Auto-Repeat-Funktion haben, 
wie zum Beispiel die Space-Taste. 

Das Programm aus Listing 2 ist ganz ähnlich aufgebaut, 
kann aber ein viel größeres Spektrum von Effekten dadurch 
realisieren, daß es die Frequenz von Stimme 1 dynamisch 
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MUSIK 


C64 


Register 

A 

D 

SU 

R 

C 

P 

F 

G 

N 

M 

A3 

S+19 

B3 

S+19 

F3 

S+20 

R3 

S+20 

C3 

S+18 

P3 

S+16 

S+17 

F3 

S+14 

S+15 

Q 

Vogelgezwitscher 

0 

8 

0 

8 

16 

X 

40000 

500 

8 

10 

0 

8 

0 

0 

X 

X 

X 

28 

Bongo 

0 

7 

0 

7 

16 

X 

4000 

1000 

4 

1 

0 

8 

0 

0 

X 

X 

X 

28 

E-Baß 

0 

8 

0 

9 

32 

X 

750 

1000 

7 

1 

0 

10 

0 

0 

X 

X 

X 

28 

Dampfhammer 

0 

9 

0 

11 

128 

X 

5000 

200 

20 

15 

0 

9 

0 

9 

X 

X 

X 

28 

Martinshorn 

0 

0 

15 

8 

64 

1000 

7000 

720 

300 

1 

X 

X 

X 

X 

64 

2048 

15 

27 

Sirene 

10 

13 

0 

0 

64 

2048 

10000 

400 

300 

1 

X 

X 

X 

X 

16 

X 

30 

27 

Geklimper 

0 

0 

15 

0 

64 

2048 

10000 

200 

400 

1 

X 

X 

X 

X 

128 

X 

20 

27 

Grollen 

9 

10 

0 

0 

32 

X 

50000 

2000 

40 

10 

X 

X 

X 

X 

128 

X 

500 

27 


Tabelle 3. Einige Beispiel-Effekte für Listing 3. Die Parameter müssen in den Zeilen 610 bis 650 verändert werden. 


verändert. Dazu dient die innere Schleife, Zeile 260-300. 
Dort wird bei jedem Durchlauf die Frequenz Fl mit einem 
Faktor G multipliziert. Für G > 1 steigt die Frequenz schnel¬ 
ler an, für G < 1 nimmt sie ab und zwar um so schneller, je 
weiter G von 1 entfernt ist. Die Umrechnung von Fl in Low- 
und High-Byte geschieht hier nach der schnellen Methode 
2. Man beachte, daß damit nur Fl-Werte bis 32767 verarbei¬ 
tet werden können, also nur die Hälfte des vollen Frequenz¬ 
umfangs des SID. In der äußeren Schleife wird der Wert 
von Fl auf seinen Ausgangswert F zurückgesetzt. Außer¬ 
dem steuert die äußere Schleife bei jedem Durchlauf einen 
ADSR-Hüllkurvenzyklus durch GATE-ON-GATE-OFF. Die 
Zahl N gibt dabei die Anzahl der inneren Schleifendurch¬ 
läufe an, die Zahl M die der äußeren Schleifendurchläufe. 
Beispielparameter zu Listing 2 findet man in Tabelle 2. 

Das dritte Programm (Listing 3) verwendet schließlich 
den Signalverlauf oder die Hüllkurve von Stimme 3, um 
Stimme 1 zu modulieren. Dies geschieht in der inneren 
Schleife, Zeile 360-380. Q ist dabei die Adresse eines der 
Leseregister des SID, also entweder S+27 für den Signal¬ 
verlauf oder S+28 für den Hüllkurvenverlauf. In der DATA- 
Zeile 650 ist dazu nur 27 oder 28 anzugeben. Über die Va¬ 
riable G kann die Stärke der Modulation, die sogenannte 
Modulationstiefe, gesteuert werden. Ein kleinerer Wert von 
G ergibt hier eine stärkere Modulation. Die äußere Schleife 
steuert hier ADSR-Hüllkurvenzyklen für Stimme 1 und 
Stimme 3. Dieses kleine Programm sollte Anlaß zum weite¬ 
ren Experimentieren sein. Man kann statt der Tonfrequenz 
zum Beispiel auch einmal versuchen, die Pulsweite oder 
die Filterfrequenz zu modulieren. Tabelle 3 enthält einige 
Parametersätze für dieses Programm. 

Ausblick: Programmierung von 
Musikstücken 


Dieses Thema wollen wir hier nur einmal streifen. Grund¬ 
lage hierfür ist die genaue Kenntnis der Tonleiterfrequen¬ 
zen. Diese müssen aber nicht mühsam aus Tabellen abge¬ 
tippt, sondern können durch ein kleines Programm selbst 
berechnet werden. Man muß dazu ein klein wenig Mathe¬ 
matik betreiben: 

1) Die Frequenzen zweier Töne im Oktavabstand verhalten 
sich wie 2:1. 

2) Eine Oktave ist durch die Halbtöne in zwölf gleiche Inter¬ 
valle eingeteilt und zwar nicht linear, sondern exponen¬ 
tiell. 

3) Das Frequenzverhältnis H zweier aufeinanderfolgender 
Halbtöne ist die zwölfte Wurzel aus zwei. In Basic läßt 
sich das leicht ausrechnen: 

H = 2(1/12) 

4) Man bekommt dann alle Halbtöne, indem man die 
Frequenzen, ausgehend von einem Grundwert, fort¬ 
laufend mit H multipliziert. 

Im Programm aus Listing 4 macht das eine Schleife in 


Zeile 140 bis 190. Die Variable FAUS wird mit 110 vorbe¬ 
setzt. Das entspricht einem »großen A«, dem Ton, der zwei 
Oktaven unter dem Kammerton, dem bekannten »eingestri¬ 
chenen a« mit 440 Hz, liegt. In Zeile 170 wird FAUS in den 
dazugehörenden SID-Wert F umgerechnet. F wird in High- 
und Low-Byte zerlegt, welche in den Feldern FH und FL ge¬ 
speichert werden. Dort stehen die Töne als fertige POKE- 
Werte zum Spielen einer Melodie zur Verfügung. 

Das restliche Programm erzeugt aus diesen Werten eine 
mehr oder weniger zufällige Tonfolge auf dem SID. Ein we¬ 
nig wird der Zufall aber durch die Werte in den DATA-Zeilen 
ab Zeile 500 gesteuert. Diese Werte stellen ein Blues- 
Schema in codierter Form dar. Das Schema selbst steht in 
den letzten drei Zeilen. Das Programm holt sich aus diesem 
Schema die erste Zahl. Diese zeigt auf eine der sieben Aus¬ 
wahlmengen in den vorausgehenden Zeilen. Die Auswahl¬ 
mengen enthalten Tonnummern. Das Programm spielt nun 
nacheinander acht zufällig ausgewählte Töne aus dieser 
Menge. Tonwiederholungen sind dabei möglich. Anschlie¬ 
ßend gtii,'. das Programm über den nächsten Zeiger aus 
dem Schema zu einer neuen Auswahlmenge über. Die links 
etwas abgesetzten Zahlen dienen dabei nur zur Längenan¬ 
gabe der Auswahlmengen und des Schemas. 

Mit dieser Technik kann man zwar noch keinen brauch¬ 
baren Blues »erwürfeln«, aber der Blues-Charakter wird 


deutlich hörbar. (Thomas Krätzig/kn) 


100 REM- < 146> 

110 REM EINFACHE KLANGEFFEKTE <107> 

120 REM- <166> 

130 S=54272 <150> 

140 READ A,D,SU,R,C,P,F,M,FF,FR,ML <187> 

150 POKE S+5 , 16*A +D <174> 

160 POKE S+6 ,16*SU+R <037> 

170 POKE S+2 ,P AND 255 <0G5> 

1B0 POKE S+3 ,P/256 <133> 

190 HI=INT(F/256):L0=F-256*HI <142> 

200 POKE S ,LQ <222> 

210 POKE S+l ,HI <018> 

220 POKE S+22.FF <056> 

230 POKE S+23,FR <154> 

240 POKE S+24,ML <224> 

250 GET A*sIF A*="" THEN 250 <220> 

260 : POKE S+4,C OR 1 <191> 

270 s FOR 1=1 TO M:NEXT I <161> 

280 s POKE S+4,C AND 254 <193> 

290 GOTO 250 <052> 

300 REM- <092> 

310 REM PARAMETER <224> 

320 DATA 0 ,10, 0,10:REM A D S R <165> 

330 DATA 16 :REM CONTROL-BYTE <222> 

340 DATA 2048 :REM PULSWEITE <129> 

350 DATA 40000 :REM FREQUENZ <183> 

360 DATA 100 :REM VERZOEGERUNG <216> 

370 DATA 50 sREM FILTERFREQUENZ <033> 

380 DATA 0 :REM FILTERRESONANZ <148> 

390 DATA 15 :REM MODUS/LAUT <209> 


Listing 1. Einfache Klangeffekte. Hinweise zum Text. 
Programm bitte mit dem Checksummer (Seite 158) 
eingeben. 
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MUSIK 


100 

REM- 


< 146> 

110 

REM KLANGEFFEKTE MIT 


<09B> 

120 

REM DYNAMISCHER FREQUENZSTEUERUNG 

<218> 

130 

PPM - 


< 176> 



140 

S=54272 


< 160> 

150 

READ A,D,SU,R,C,P,F,C 

;,N,M 

<206> 

160 

POKE S+5 ,16*A +D 


< 184> 

170 

POKE S+6 ,16*SU+R 


<047> 

180 

POKE S+2 ,P AND 255 


<095> 

190 

POKE S+3 ,P/256 


< 143> 

200 

POKE S+23,0 -.REM 

FR 

<203> 

210 

POKE S+24,15 sREM 

ML 

<057> 

220 

GET A*:IF A*="“ THEN 

220 

<253> 

230 

FOR 1=1 TO M 


<086> 

240 

s F1=F 


<004> 

250 

■ POKE S+4,C OR 1 


<179> 

260 

s FOR J=1 TO N 


<224> 

270 

: POKE S,F1 AND 255 

<039> 

280 

5 POKE S+1.F1/256 


< 178> 

290 

: F1=F1*G 


<010> 

300 

s NEXT J 


<206> 

310 

s POKE S+4,C 


<204> 

320 

NEXT I 


< 150> 

330 

GOTO 220 


<044> 

400 

RFM 





< 1 

410 

REM PARAMETER 


<068> 

420 

DATA 0 ,10, 0,10:REM 

A D SU R 

<08B> 

430 

DATA 16 :REM 

CONTROL-BYTE C 

<092> 

440 

DATA 2048 : REM 

PULSWEITE P 

<038> 

450 

DATA 16000 :REM 

FREQUENZ F 

< 124> 

460 

DATA 1.33 :REM 

FAKTOR G 

< 117> 

470 

DATA 2 -. REM 

ANZAHL N 

< 197> 

480 

DATA 25 : REM 

ANZAHL M 

<084> 

Listing 2. Klangeffekte mit Frequenzsteuerung 



100 



<146) 



110 

REM KLANGEFFEKTE MIT 


<098) 

120 

REM DYNAMISCHER STEUERUNG 

< 139> 

125 

130 

REM DURCH STIMME 3 
REM- 


<066> 

<176> 


140 S=54272 6-'<160>nf !Ul 


150 READ A,D,SU,R,C,P,F,G,N,M <206> 
160 PQKE S+5 ,16*A +D <1B4> 
170 POKE S+6 ,16*SU+R <047> 
180 POKE S+2 ,P AND 255 <095> 
190 POKE S+3 ,P/256 <143> 
200 POKE S+23,0 :REM FR <203> 
210 POKE S+24,128+15sREM ML (S3 AUS) <0B6> 
220 READ A3,D3,S3,R3,C3,P3,F3,Q <190> 
230 HI=INT(F3/256):L0=F3-256*HI <201> 
240 POKE S+14,L0 <197> 
250 POKE S+15.HI <255> 
260 POKE S+16,P3 AND 255 <111> 
270 POKE S+17.P3/256 <209> 
280 POKE S+19,16*A3+D3 <209) 
290 POKE S+20,16*S3+R3 <204) 
300 Q=S+Q <2301 
310 F=F/256 <091> 
320 GET A*:IF A*="" THEN 320 <131) 
330 FOR 1=1 TO M <1B8> 
340 : POKE S+4 ,C OR 1 <015> 
350 : POKE S+18,03 OR 1 <012> 
360 : FOR J=1 TO N <068> 
370 : POKE S+l,F*(1+PEEK(Q)/G) <106> 
3B0 : NEXT J <030> 
390 ! POKE S+4 ,C <028> 
400 : POKE S+18,03 <166> 
410 NEXT I <240> 
420 GOTO 320 <142> 

500 REM- <036) 

510 REM PARAMETER STIMME 1 <250? 
520 DATA 0 , 8, 0, 8:REM A D SU R <243) 
530 DATA 32 :REM CONTROL-BYTE C <146) 
540 DATA 2048 :REM PULSWEITE P <140> 
550 DATA 40000 :REM FREQUENZ F <I54> 
560 DATA 500 -.REM FAKTOR G <239> 
570 DATA 8 :REM ANZAHL N <091> 
580 DATA 10 :REM ANZAHL M <09B> 
600 REM PARAMETER STIMME 3 <094> 
610 DATA 0, B, 0, 0:REM A3 D3 S3 R3 <144> 
620 DATA 16 :REM CONTROL C3 <233> 
630 DATA 2048 :REM PULSWEITE P3 <127> 
640 DATA 10 :REM FREQUENZ F3 <063> 
650 DATA 28 :REM MOD.-QUELLE Q <201> 


Listing 3. Klangeffekte mit Steuerung durch Stimme 3 


10 REM- 

20 REM ZUFALLSTONFOLGE 

30 REM MIT BLUES-SCHEMA 

40 REM 

50 REM AUSNUETZUNG ALLER DREI STIMMEN 

60 REM ZUR KLANGVERBESSERUNG 

70 REM 

80 REM T. KRAETZIG MAERZ 86 

< 161 > 

<234> 
<079> 
<102> 
<099> 
<23S> 
< 132> 
<245> 




<241 > 

100 

DIM FL(25) :REM ARRAY F. FREQUENZEN 

<05B> 

101 

DIM FH(25) 


< 137> 

102 

DIM A(8,20):REM AUSWAHLMENGEN 


< 164> 

104 

DIM S(30) :REM SCHEMA 


< 131 > 

110 

S =54272 :REM BASISADRESSE 


<235> 

130 

s 


< 106> 

140 

REM TONLEITER-FREQUENZEN BERECHNEN 

< 166> 

150 

FAUS=110:H=2t(1/12) 


<026> 

160 

FOR 1=0 TO 25 


<152> 

170 

: F=INT(FAUS#17.0284+0.5) 


< 123> 

172 

: FH(I)=INT(F/256) 


<213> 

174 

: FL(I)=F-256*FH(I) 


<097> 

180 

: FAUS=FAUS*H 


<067> 

190 

NEXT I 


<01B> 

200 

: 


<176> 

210 

REM PARAMETER FESTLEGEN 


< 133> 

220 

PW=204B :REM PULSWEITE 


< 137> 

230 

C =32 :REM KURVENFORM 


< 135> 

240 

A=0:D=10-.SU=0:R=9 


< 192> 

250 

FOR 1=0 TO 14 STEP 7 


< 159> 

255 

: POKE S+I+2,PW AND 255 


<12B> 

260 

: POKE S+I+3,PW/256 


<233> 

265 

: POKE S+I+5,16*A+D 


< 160> 

270 

: POKE S+I+6,16*SU+R 


<024> 

275 

NEXT I 


<105> 

280 

: 


<002> 

290 

REM FILTER AUS UND LAUTSTAERKE 

MAX. 

< 155> 

300 

POKE S+23,0:POKE S+24,15 


<066> 

310 

s 


<032> 

320 

REM AUSW.MENGEN UND SCHEMA EINLESEN 

<240> 

325 

READ I:A(0,0)=I 


<245> 

330 

FOR K=1 TO I 


<202> 

335 

: READ J:A(K,0)=J 


<22B> 

3*. 

: FOR L=1 TO 3:READ A(K,L):NEXT L 

<013> 

350 

NEXT K 


< 196> 

355 

READ I:S(0)=1 


< 175> 

360 

FOR K=1 TO I 


<232> 

365 

: READ S(K) 


<051 > 

370 

NEXT K 


<216> 

375 

: 


<097> 

3B0 

REM ZUFALLSTONFOLGE 


<084> 

385 

L=0:0=0 


<239> 

390 

FOR 1=1 TO S(0) 


<039> 

395 

: J=S(I) 


<051 > 

400 

: N=A(J,0) 


<15B> 

405 

: FOR K=1 TO 8 


< 107> 

410 

: ZZ=A(J,INT(RND(1)*N+1)) 


<064> 

412 

: POKE S+L ,FL(ZZ+0> 


< 166> 

414 

: POKE S+L+l,FH(ZZ+O) 


< 115> 

416 

: POKE S+L+4,C OR 1 


< 105> 

420 

: FOR P=1 TO 40:NEXT 


<035> 

425 

: POKE S+L+4,C 


<21B> 

430 

: FOR P=1 TO 40:NEXT 


<045> 

435 

: L=L+7: IF L=21 THEN L=0 


< 121 > 

440 

: NEXT K 


< 106> 

445 

NEXT I 


<019> 

450 

0=0+1:IF 0=4 THEN 0=0 


<003> 

455 

FOR P=1 TO 1150: NEXT 


< 1B3> 

460 

GOTO 390 


<038> 

S0H71 

REM 


Sn TAS 

510 

REM AUSWAHLMENGEN UND SCHEMA 


<016> 

520 

ppM. 


<058> 



530 

DATA 7 


<221 > 

540 

DATA 8, 0,4,7,10,12,16,19,22 


<243> 

550 

DATA 8, 0,3,5,9, 12,15,17,21 


<23B> 

560 

DATA 7, 2,5,7,11,14,17,19 


<126> 

570 

DATA 6, 0,0,4, 7, 7,10 


<096> 

580 

DATA 4, 0,3,5,9 


< 114> 

590 

DATA 5, 2,5,7,7,11 


<237> 

610 

DATA 2, 0,7 


< 115> 

620 

: 


<088> 

630 

DATA 24, 7,1,2,1,3,2,1,3 


<210> 

640 

DATA 4 , 4 , 5, 4 , 6 , 5, 4,6 


<05B> 

650 

DATA 7,1,2,1,3,2,1,3 


< 117> 


Listing 4. Programm zum Errechnen einer Zufalls- 
Blues-Musik. Bitte alle Listings mit dem Checksummer 
(Seite 158) eingeben. 
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Der C 64 als Sound-Maschine 


Jetzt können Sie die Sound-Fähigkeiten Ihres 
C64 nutzen. Mit dem Programm »Sound-Editor« 
wird Ihr Computer zum Synthesizer. 

D ie meisten modernen digitalen Synthesizer haben ei¬ 
ne Gemeinsamkeit: eine fast unüberschaubare Viel¬ 
zahl von Einstellmöglichkeiten. Das leistungsfähige 
Programm Modulator (Listing 1) ist da keine Ausnahme. Um 
die reichhaltigen Möglichkeiten, die dieses Programm bie¬ 
tet, effektiv und komfortabel zu nutzen, benötigt man ein 
komfortables Editorprogramm. Ein solches Programm, der 
»Sound-Editor« (Listing 2), wird hier vorgestellt. Es zeigt die 
über 70 Parameter des Sound-Chips und vom Modulator, 
übersichtlich nach Funktionsgruppen geordnet, auf dem 
Bildschirm an und erlaubt einen schnellen Zugriff auf alle 
Einstellwerte. Diese Einstellwerte können geändert wer¬ 
den, während ein Ton klingt, so daß die Wirkung der Einstel¬ 
lung unmittelbar überprüft werden kann. Zudem können 
Sie Töne im Bereich von zwei Oktaven direkt über die Tasta¬ 
tur anspielen. Dabei können zwar nicht mehrere Tasten 
gleichzeitig gespielt werden, man kann aber zwei oder drei 
SID-Stimmen mit einem Tastendruck gleichzeitig erklingen 
lassen. Darüber hinaus verwaltet das Programm 24 Para¬ 
metersätze, im folgenden Sounds genannt, im Arbeitsspei¬ 
cher. Diese 24 Sounds lassen sich als eine Datei von Dis¬ 
kette laden, bearbeiten und wieder speichern. 

Das abgedruckte Programm kann man beim Programm¬ 
service bestellen oder auch selbst abtippen, was bei 100 


Blöcken allerdings etwas mühsam ist. Man sollte aber trotz¬ 
dem alle Zeilennummern (auch die REM-Zeilen!) eintip¬ 
pen, da viele Zeilen angesprungen werden, auch wenn sie 
nur Kommentare enthalten. Man hüte sich aber davor, ein 
RENUMBER-Utility auf das Programm anzuwenden. Die 
meisten Sprünge werden nämlich nicht über die Basic-Be- 
fehle GOTO und GOSUB abgewickelt, sondern über zwei 
Maschinenprogramme GT und GS (darüber später mehr). 
Diesen Umstand kann ein RENUMBER-Programm natür¬ 
lich nicht berücksichtigen. 

Sound mit Komfort 


Der Sound-Editor ist nur zusammen mit dem Programm 
Modulator (Listing 1) lauffähig. Dieses Programm muß auf 
Diskette unter dem Namen »MODULATOR« vorliegen, da 
es vom Sound-Editor (Listing 2) nachgeladen wird. 

Jetzt müßte der Sound-Editor, sofern er fehlerfrei einge¬ 
tippt wurde, laufen. Da es sich hier um ein Programm han¬ 
delt, das überwiegend in Basic geschrieben ist, ist ein um¬ 
fangreicher Initialisierungsteil, der etwa 30 Sekunden bean¬ 
sprucht, unvermeidbar. Das Warten wird aber durch Komfort 
und durchaus akzeptable Geschwindigkeit belohnt. 

Der Sound-Editor meldet sich mit dem Hauptmenü (Bild 
1) mit dem Namen MODULATOR. Damit soll betont werden, 
daß Modulator der eigentliche Kern des Programms ist. Der 
Sound-Editor wird ausschließlich über die Tastatur bedient, 


I -MODULATOR-II 

I I THOMAS KRAETZIG 1985 I I 


SH U STIMMFN PAROMFTFR 
F F II TFR/I OUTSTOT RKf 
I l FO 

H HUFI I KIIRUF <S0f I I G> 
K KSU 

SH S SOUNDS 
D DISK 


U 1,2.3 STIMMF 1.2,3 S SUSTOIN 

SH SPOCF FG <00 >K0PPFIN SPOCI F G GOTF 
X HAUPTMF HUF 

OK I IU 


Bild 1. Hauptmenü des Sound-Editors 

E 



0 20-10 
0 20-10 
0 20-40 



R CONTROI PORTO 


8 10 0100000 
0 10 0100000 
8 10 0010000 


lllllll 



r- . '- R 1 

LA *♦ 1 —rrsT 

F3 » I-TRION 

F5 - -SOMTOOTH 

F7 -- -SQUORE 

-NO ISF 

U 1,2,3 STIMMr 1.2,3 S SUSTOIN 

SH SPOCF FG (OB >K0PPFIN SPAFF FG GOTF 
X HAUPTMF NHF 


IS 


AKTIU 


V 


Bild 2. Untermenü Stimmenparameter 
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800 
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fl » « FII TI LP « 

F3 ♦ FIIT2 BP * 

F5 FILT3 HP 

F7 I II II X 30TI 

U ‘,2,3 STIMMF 1.2,3 S SUSTOIN 

SH sf>0f:F FG <00 >fco( , PFl N SPOTT TG GOTF 
X HOUPTMFNUF 
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OK I 1 U 

^tK.n 

SOFT FG 


Bild 3. Untermenü Filter/Lautstärke 
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sf-o^r 


S TIMMT 
TG <00 


HOUPTMT NUT 


n irion ri sr r 

• SOHUP HOID 
SOWDWN RUN 
SQUORI 

1,2,3 S SUSTOIN 

>k oppri n srori ro gott 


okt iu 

MtHin 

SOTT TG 


Bild 4. Untermenü LFO 
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wobei.sich die meisten Funktionen mit einem einzigen Ta¬ 
stendruck auslösen lassen. Es ist durchgehend das WYSI- 
WYG-Konzept (What You See Is What You Get) verwirklicht, 
das heißt, alle in einer Situation verfügbaren Kommandos 
werden am Bildschirm angezeigt. Eine Ausnahme bilden 
die sieben Kommandos zur Auswahl der Untermenüs, die 
zwar nur im Hauptmenü angezeigt werden, aber auch in je¬ 
dem Untermenü funktionieren. Das achte Kommando (»Se- 
quencer«) ist in Bild 1 noch nicht implementiert. Diese äu¬ 
ßerst leistungsstarke Funktion werden wir erst später be¬ 
sprechen. Man kann also direkt von einem Untermenü ins 
andere springen. Den Umweg überdas Hauptmenü benö¬ 
tigt man eigentlich nur, wenn man die Kommandos nicht 
mehr weiß. 

Das untere Drittel des Bildschirms ist in allen Menüs 
identisch. Es zeigt eine stilisierte Klaviatur über zwei Okta¬ 
ven, der auf dem Computer die oberen beiden Tastenrei¬ 
hen entsprechen. Mit diesen Tasten kann man bis zu drei 
Stimmen mit einem Tastendruck anspielen. Mit dem Kom¬ 
mando V und einer Ziffer 1,2 oder 3 können die zu spielen¬ 
den Stimmen aktiviert oder desaktiviert werden. Angezeigt 
wird das rechts neben der Klaviatur. 

Die Funktion SUSTAIN bewirkt, daß der Ton nach dem 
Loslassen einer Tontaste weiterklingt, sofern ein SUSTAIN- 
Pegel größer als Null eingestellt ist. Die GATE-Bits des SID 
werden bei aktivierter SUSTAIN-Funktion nicht zurückge¬ 
setzt. Durch Drücken der S-Taste wird SUSTAIN aktiviert, 
durch weiteres Drücken reaktiviert. Mit dem Drücken der 
SPACE-Taste wird das GATE-Bit des Software-Hüllkurven¬ 
generators (Soft-EG) gesetzt, durch Loslassen zurückge¬ 
setzt. Der Soft-EG wird also durch < SPACE > ausgelöst, 
vorausgesetzt, seine Parameter haben sinnvolle Werte. 


Das Auslösen des Soft-EG kann man mit <SHIFT 
SPACE > an die Tontasten koppeln, was bei den meisten 
Soft-EG-Anwendungen sinnvoll sein dürfte. Auch die 
SUSTAIN-Funktion und die Koppelung des Soft-EG werden 
rechts neben der Klaviatur angezeigt. 

Die Beeinflussung der Parameter in den Untermenüs er¬ 
folgt nach einheitlichem Schema: Der zu ändernde Para¬ 
meter wird mit den Cursortasten angewählt und mit den 
Funktionstasten verstellt. Je nach Anzahl der Parameter 
sind dabei alle vier Cursortasten oder nur die Tasten 
<CURSOR-links> und <CURSOR-rechts> wirksam. 
Auch die Funktionsweise der Funktionstasten ist einheit¬ 
lich: Numerische Parameter werden durch <F1> und 
<F7> in großer und durch <F3> und <F5> in kleiner 
Schrittweite verstellt. Bei nichtnumerischen Parametern 
wird die Funktion der F-Tasten am Bildschirm angezeigt. 

Bei numerischen Parametern werden bis auf eine Aus¬ 
nahme direkt die Werte der SID- oder Modulatorregister an¬ 
gezeigt. Bei der Ausnahme handelt es sich um die Basisfre¬ 
quenzen der drei Stimmen (Bild 2, Parameter F). Diese Ba¬ 
sisfrequenz ist der tiefste spielbare Ton (Taste <Q>). Sie 
wird nicht in Hertz, sondern in einer musikalisch sinnvollen 
Notation angegeben. Sie besteht aus Notennamen, einer 
Oktavnummer und einer Verstimmung in Cent. Die Oktav¬ 
nummern bewegen sich im Bereich 0 bis 5. Dabei ent¬ 
spricht A 4 dem 440-Hz-Ton, der in der Musik korrekt »ein¬ 
gestrichenes a« heißt. Ein Cent ist ein hundertstel Halbton. 
Der Parameter bewegt sich von -49 bis +50. Die etwas 
komplizierte Berechnung der Basisfrequenz in Hz und in 
SID-Registerwerten findet man in den Programmzeilen ab 
3110. 

Alle anderen Sound-Parameter sind anhand der Menü- 
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Bild 5. Untermenü Software-EG 
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Bild 6. Untermenü KSV (Kreuzschienenverteiler) 


DWK 

Fl SOUNDS I ADEN 
T3 SOUNDS ABSPFICHFRN 

DATEINAME •> SOUNDS 


U 1,2,3 STIMMF 1.2,3 S SUSTAIN 
SH SPACE FG (AB TKOPPIIN SPACI IG GATF 
X HAUPTMFNIir 



Bild 7. Untermenü Sounds 



Bild 8. Untermenü Disk 
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Real 

A allgemeine Verwendung, ASCII-Codes 

AD allgemeine Adresse 

AN Auswahlnummer bei EG 

(0=A 1 = D 2=S 3=R 4=EGA) 

AV Auswahlvektor bei Parameterwahl durch Cursor 

B allgemeine Verwendung 

CL Startadresse CLEAR (Zeile 0 bis 14) 

DO Startadresse DOKE 

EG Status des Soft-EG (0 = abgekoppelt, -1 = angekoppelt) 

F allgemeiner Farbcode 

Fl Code für Normalfarbe 

F2 Code für Hervorhebungsfarbe 

FA Basisadresse Farb-RAM 

GS Startadresse berechnetes GOSUB 

GT Startadresse berechnetes GOTO 

I.J.K allgemeine Laufvariablen 

L String-Länge 

LN Nummer des aktuellen LFO 

M aktuelles Untermenü (0 bis 7) 

MO Basisadresse Modulator 

NS Sound-Nummer (0 bis 23) 

O Oktave (temporär) 0 bis 5 

OF Tonhöhen-Offset (temporär) -49 bis +50 

PA Parameter-Zieladresse 

PB Farb-RAM-Adresse des aktuellen Parameterfeldes 

PM Maximum +1 des aktuellen (numerischen) Parameters 
PR Startadresse PRINT AT 

PV Sprungvektor zur Weiterverarbeitung des aktuellen 

Parameters 

PW Wert des aktuellen Parameters 

PI Schrittweite langsam 

P2 Schrittweite schnell 

RF RES/FILT Inhalt von SID $17 

S Spalte allgemein 

SA Sound-Adresse (Anfang eines Parameterblocks) 

Tabelle 1. Die Variablen des Sound-Editors auf einen Blick 

bilder, in denen sie auftreten (Bild 2 bis 6), leicht identifizier¬ 
bar und bedürfen keiner weiteren Erläuterung. 

Im Menü SOUNDS (Bild 7) können ganze Parametersät¬ 
ze (jeweils 107 Byte, siehe auch Tabelle 1) mit Namen verse¬ 
hen und im Speicher abgelegt werden. Angewählt werden 
die Sounds hier nicht über die Cursortasten, sondern über 
die Tastenkombinationen <A1> bis <C8>. Die 24 
Sounds sind alle mit der Parametereinstellung, die beim 
Programmstart vorliegt, vorbesetzt. Eine Gruppe von 24 
Sounds kann im Menü DISK (Bild 8) auf Diskette gespei¬ 
chert und wieder geladen werden. 

Bemerkungen zum Programm 


Es soll hier nicht die Arbeitsweise des Sound-Editors im De¬ 
tail beschrieben, sondern nur einige Bemerkungen zum 
Stil des Programms gemacht werden. In dem Programm 
werden sehr viele Tastenkommandos akzeptiert, die in ver¬ 
schiedenen Menüs und bei den verschiedenen Parame¬ 
tern auch noch unterschiedliche Bedeutung haben. Um in 
dieser Situation die Übersicht zu behalten (Anliegen des 
Programmierers) und um das Programm trotz Realisierung 
in Basic akzeptabel schnell zu halten (Anliegen des Anwen¬ 
ders), werden die vielen Einzelroutinen von zentraler Stelle 
aus über variable Vektoren angesprungen. Zwar unter¬ 
stützt Basic mit den Befehlen ON GOTO und ON GOSUB 
Mehrfachverzweigungen, diese sind aber bei der hier in 
Frage kommenden sehr großen Zahl von Sprungzielen 
schlecht einzusetzen. Die beiden Maschinenprogramme 
GS und GT (siehe auch Tabelle 2) erlauben dagegen 
(Unterprogramm-)Sprünge zu Zeilen, deren Nummer ein 
beliebiger arithmetischer Ausdruck oder eine Variable, der 
Sprungvektor, sein kann. 


Sl 

Basisadresse SID 

SN 

Nummer der aktuellen Stimme 

SO 

Basisadresse Sounds 

T 

Tonnummer (temporär) 0 bis 11 

X,Y 

allgemeine Verwendung 

Z 

Zeile allgemein 

ZN 

Strings 

Zeilennummer allgemein 

A$ 

Eingabezeichen, allgemeine Verwendung 

F1$ 

Steuerzeichen Normalfarbe 

F2$ 

Steuerzeichen Hervorhebungsfarbe 

DNS 

Dateiname 

Zahlen-Arrays 

AD(2) 

Attack/Decay für 3 Stimmen 

BF(2) 

Basisfrequenz für 3 Stimmen 

C(2) 

Controlbyte (GATE aus) für 3 Stimmen 

01(2) 

Controlbyte (GATE an) für 3 Stimmen 

0(2) 

Oktaven für 3 Stimmen 0 bis 3 

OF(2) 

Tonhöhen-Offset für 3 Stimmen -49 bis +50 

S(2) 

Status der Stimmen (0 = inaktiv, -1 = aktiv) 

SR(2) 

Sustain/Release für 3 Stimmen 

T(2) 

Tonhöhennummer für 3 Stimmen 0 bis 11 

TH(24) 

relative Tonhöhen 

TN%(255) 

Tonnummern (0 bis 24) 

TN%(A) = Nummer des Tones bei Tastendruck 
CHR$(A) 

V%(7,255) 

Sprungvektoren 

String-Arrays 

BL$(6) 

0 bis 6 Blanks 

KF$(3) 

LFO-Kurvenformen grafisch 

KV$(3) 

Namen der LFO-Kurvenformen 

MD$(3) 

Namen der Modulationsquellen-Modi: RESET, 
HOLD, RUN 

TN$(11) 

Namen der Töne: C, C#, D, D#, E, F, ?#, G, G# 
A, A#, H 


Die Tastenkommandos werden nun sehr schnell und auf 
einfache Weise interpretiert. Der ASCII-Code A der zuletzt 
gedrückten Taste und die Nummer M des gerade aktiven 
Menüs (0 bis 7) werden als Indizes in eine Sprungvektor¬ 
tabelle V% verwendet. Der gefundene Eintrag ist die Zei¬ 
lennummer der Routine, die den Tastendruck bearbeitet. 
Diese Routine wird als Unterprogramm aufgerufen. Für 
diesen Vorgang benötigt man nur einen einzigen Befehl: 
SYSGS,V°/o(M,A) (Zeile 1550). 

Allen nicht definierten Tasten wird über die Tabelle der 
Sprungvektor 0 zugeordnet. Er führt in das leere Unterpro¬ 
gramm ganz am Anfang des Listings. Die Sprungtabelle 
wird über die Inhalte der DATA-Zeilen ab 9500 im 
Programm-Setup besetzt. Vierstellige DATAs stehen für 
Zeilennummern, dreistellige für ASCII-Codes, zweistellige 
wählen ein Menü (dabei bedeutet zum Beispiel Ml »Menü 
Nr. 1« und MA »alle Menüs«) und einstellige sind ASCII- 
Zeichen. »ENDE« schließt die Tabellen-DATAs ab. Der Pro¬ 
grammteil ab Zeile 8110 interpretiert diese DATAs und be¬ 
setzt die Tabelle. 

Eine Ergänzung des Programms um weitere Funktionen 
gestattet sich mit diesem Konzept sehr einfach. Man 
schreibt ein Unterprogramm und trägt die Zeilennummer 
des Unterprogramm-Starts zusammen mit der Taste, durch 
die das Unterprogramm aufgerufen werden soll, in die Ta¬ 
belle ein. Die Hardcopys (Bilder 1 bis 8) entstanden auf die¬ 
se Weise: Ab Zeile 7900 stand eine Hardcopy-Routine (im 
Listing hier nicht enthalten). 

Durch 9760 DATA MA,7900,Z wurde bewirkt, daß in allen 
Menüs durch den Tastendruck Z ein Hardcopy-Ausdruck 
ausgelöst werden konnte. 

Im Sound-Editor werden noch weitere Sprungvektoren 
angewendet: Eine Funktionstaste führt grundsätzlich in die 
Dummy-Routine (leeres Unterprogramm) oder in eine der 
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vier Zeilen 2550, 2560, 2570, 2580. Dort wird ein aktueller 
numerischer Parameterwert erhöht oder erniedrigt. An¬ 
schließend wird in eine der 21 Routinen ab Zeile 2600 wei¬ 
terverzweigt. Die zugehörige Vektorvariable ist PV. Die 21 
Einzelroutinen bringen den geänderten Parameter an sei¬ 
nen Platz in ein SID- oder ein Modulator-Register und ge¬ 
ben ihn zudem an der richtigen Stelle am Bildschirm aus. 

Der Parametervektor PV wird von Parameter-Anwahl- 
Routinen gesetzt, von denen es in jedem Menü für jede Pa¬ 
rameterart eine gibt, zum Beispiel »Filterfrequenz« wählen, 
Zeile 5200. Der Aufruf einer Parameter-Anwahl-Routine 
wird durch die Cursortasten ausgelöst und geschieht durch 
einen weiteren Vektor AV. Beispiel: »Parameterwahl durch 
Cursor«, Zeile 5130. Von diesen Cursor-Routinen gibt es 
fünf Ausführungen. Für jedes Menü, in denen die Cursorta¬ 
sten wirksam sind, eine. 

Einige Maschinenprogramme machen den Sound-Edi¬ 
tor schneller und übersichtlicher. Erwähnt seien dabei Un¬ 
terprogramme zum Zugriff auf Doppelbytes von Basic aus 


Name 

Startadresse 

Aufruf 

Funktion 

GS 

828 

SYSGS, Zeilennummer 

Berechnetes G0SUB 

GT 

857 

SYSGT, Zeilennummer 

Berechnetes GOTO 

PR 

869 

SYSPR, Zeile, 

PRINT AT: Positioniert den Cursor an 



Spalte, Printliste 

der Position Zeile (0 bis 24), Spalte 
(0 bis 39) und geht über zum 
Basic-PRINT 

DO 

897 

SYSDO, Adresse, Wert 

DOKE: Doppelbyte-POKE Schreibt 
einen 16-Bit-Wert (0 bis 65536) ab 
Adresse in den Speicher, niederwer¬ 
tiges Byte zuerst 

USR 

937 

USR (Adresse) 

DEEK: Doppelbyte-PEEK 

Liefert 16-Bit-Wert der Speicherstel- 




lenadresse und Adresse +1 

CL 

959 

SYSCL 

CLEAR: Löscht Bildschirm 

Zeilen 0 bis 14 

NA 

50229 

SYSNA, Adresse 

NAME: Ausgabe von zehn Zeichen, 
deren ASCII-Codes ab Adresse im 
Speicher stehen. Dient zur Ausgabe 
von Soundnamen 

GE 

50245 

SYSGE, Adresse 

GET: Belegt SID und MODULATOR 
mit Parametersatz, der ab Adresse 
im Speicher sieht (siehe Tabelle 11) 

PU 

50276 

SYSPU, Adresse 

PUT: Kopiert Parameter von MODU¬ 
LATOR (aber keine SID-Parameter!) 
in Parameterblock ab Adresse (siehe 
Tabelle 11) 

Alle hier aufgeführten Unterprogramme ermitteln ihre Parameter mit Hilfe des Basic- 
Interpreters. Es sind daher beliebige arithmetische Ausdrücke (beziehungsweise String- 
Ausdrücke bei PR) möglich. Es wird ein ■Illegal Quantity Error« ausgelöst, wenn die Parame¬ 
ter ihren zugelassenen Bereich (0 bis 255 beziehungsweise 0 bis 65535) überschreiten. 


Tabelle 2. Unterprogramme in Maschinensprache 


Zero-Page 

$02 



$9B 

$FB-$FE 

von MODULATOR benutzt 


$9E-$9F 

von NA, GE und PU benutzt 

USFt-Vektor 

$311-$312 

belegt mit Startadresse von DEEK ($03A9) 

Kassetten- 

$33C-$3D4 

Maschinenprogramme 

puffer 


GS, GT, PR, DO, USR (DEEK), CL 

Basic 

$0800-$08FF 

(obere Speichergrenze heruntergesetzt) 

Sounds 

$9000-$9A07 

24 Parameter-Blöcke ä 107 Byte 

Freier RAM- 

$C000-$C070 

MODULATOR-Parameter 

Bereich 

$C071-$C074 

MODULATOR-interne Variablen 


$C075-$C422 

MODULATOR-Code 


$C423-$C473 

Maschinenprogramme NA, GE, PU 


Tabelle 3. Speicherbelegung durch den Sound-Editor 


(»DEEK« und »DOKE«). Das lästige Berechnen von Low- 
und High-Byte entfällt so. Der »PRINT AT«-Befehl gestattet 
es, den Cursor an jede Stelle des Bildschirms zu positionie¬ 
ren, um dort etwas auszugeben. Die Tabellen 1 bis 4 sollen 
eine kleine Dokumentation des Sound-Editors darstellen. 
Der Leser, der das Programm selbst modifizieren oder er¬ 
weitern will (zum Beispiel andere oder mehr Farben), findet 
dort die Information. Das Tabellen- und Vektorkonzept wird 
einen weiteren Ausbau des Programms sehr erleichtern. 

Die ersten Klangexperimente 


Zunächst einige allgemeine Tips zur Suche nach Klängen 
und Effekten. 

Der Sound-Editor eignet sich eigentlich gut zum Experi¬ 
mentieren durch Versuch und Irrtum, da das Resultat im¬ 
mer unmittelbar hörbar wird. Dennoch sollte man sich über 
die Wirkung der vielen möglichen Einstellungen schon vor¬ 
her im klaren sein, um gezielt experimentieren zu können. 
Dazu einige praktische Hinweise unter Verzicht auf theore¬ 
tischen Ballast: 

1. Mit der Grundeinstellung anfangen 

Wenn man eine ganz neue Einstellung machen möchte, 
beginnt man am besten mit der Grundeinstellung, die nach 
dem Start des Programmes vorliegt. Es ist nur Stimme 1 mit 
einem völlig unmodulierten, symmetrischen Rechteck¬ 
klang hörbar. Die voreingestellte Hüllkurve hat einen rhyth¬ 
misch geprägten Charakter (kurzes Attack/Anschwellen) 
und mittellanges Decay (Halten) und eine angenehme Aus¬ 
klingphase (mittellanges Release). 

2. Kurvenform und Hüllkurve wählen 

Man beginnt mit dem Untermenü Stimme (<SHIFTV>). 
Dort 1'ann man die wichtigsten SID-Parameter wie Kurven¬ 
form, Hüllkurve und Tonlage einstellen. Die Pulsweite PW 
ist nur bei der Rechteckkurve relevant. Der voreingestellte 
Wert 2048 entspricht einem symmetrischen Rechteck. Es 
ist empfehlenswert, von dieser Einstellung abzuweichen, 
da unsymmetrische Rechtecke obertonreicher sind und 
damit meistens interessanter klingen. Der Portamento- 
Effekt ist übrigens nur bei Werten größer als 0 aktiv. 

3. Kurvenformen kombinieren 

Interessante und sehr obertonreiche Klänge erhält man, 
wenn man im CONTROL-Register das Bit für Rechteck zu¬ 
sammen mit dem für Dreieck oder Sägezahn setzt. Man 
muß dabei auch etwas mit der Pulsweite experimentieren, 
da bei bestimmten PW-Werten überhaupt nichts hörbar ist. 
Versucht man, Rauschen mit einer anderen Kurvenform zu 
kombinieren, kann es passieren, daß sich der Oszillator 
»aufhängt«. In diesem Fall muß das TEST-Bit kurz ein- und 
ausgeschaltet werden, damit wieder etwas hörbar wird. 

4. Sustain-Modus 

Oft ist es erwünscht, daß ein Ton oder Klang auch ohne 
Tastenbetätigung weiterklingt, zum Beispiel wenn man in 
Ruhe die Wirkung von Parameteränderungen studieren 
möchte. Dazu ist der Sustain-Modus vorgesehen. Man muß 
dazu nur die Taste <S> betätigen. Eine weitere Betäti¬ 
gung schaltet diesen Modus wieder aus. 

5. Filter 

Das Filter ist eine etwas problematische Komponente 
des SID. Versuche mit mehreren C 64-Exemplaren haben 
ergeben, daß Klangeinstellungen, die das Filter einbezie¬ 
hen, von Gerät zu Gerät unterschiedlich klingen. Bei glei¬ 
chen Einstellungen machen die verschiedenen SID-Filter 
unterschiedlich auf oder zu. Es kann daher Vorkommen, 
daß die Sounds mit den hier abgedruckten Parametersät¬ 
zen nicht »gut klingen«, sofern sie das Filter verwenden. 
Abhilfe schafft man dadurch, indem man die Filterfrequenz 
nach oben oder unten korrigiert, bis das Resultat zufrieden- 
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Es werden 24 Parameierblöcke der Länge 107 Byte im Bereich $9000 bis S9A08 verwaltet. 


Struktur eines Parameterblocks 


Relativadresse 

Parameter 

Variable in 
Basic (falls 

dezimal hex 


vorhanden) 


Obis 72 

$00-$48 

Modulator-Parameter 

keine 

73 bis 74 

$49 - $4A 

Basisfrequenz Stimme 1 

BF(2) 

75 

S4B 

Status Stimme 1 

S(2) 



(0 = inaktiv, 1 = aktiv) 


76 

$4C 

unbenutzt 


77 

$4D 

Control-Register Stimme 1 

C(2) 

78 

$4E 

Attach/Decay Stimme 1 

AD(2) 

79 

$4F 

Sustain/Release Stimme 1 

SR(2) 

80 bis 86 

$50-$56 

analog Stimme 2 (7 Byte) 


87 bis 93 

$57 - $5D 

analog Stimme 3 (7 Byte) 


94 

$5E 

Resonanz/Filter 

RF 

95 

$5F 

Status des Soft-EG 

EG 



(0 = abgekoppelt, 1 * angekoppelt) 


96 

$60 

Status Sustain 

SU 



(0 = aus, 1 = an) 


97 bis 106 

$61 - S6A 

Name des Sounds (10 Byte) 

keine 


Tabelle 4. Speicherung der Sound-Parameter 

stellend klingt. Eine Filterwirkung ist nur dann hörbar, wenn 
mindestens eine Stimme auf das Filter geschaltet wird 
(Spalte SCHALTER) und wenn mindestens ein Modus (LP, 
BP oder HP) aktiviert ist. 

6. Modulationen 

Richtig interessant werden Klänge erst durch Modulatio¬ 
nen. Damit eine Modulation wirksam wird, müssen in zwei 
Untermenüs Einstellungen gemacht werden. Zuerst legt 
man im Untermenü KSV (Kreuzschienenverteiler) fest, wel¬ 
che Modulationsquelle (LFO 0 bis 6 oder der Soft-Hüllkur- 
vengenerator) auf welches Ziel (Frequenzen, Pulsweiten, 
Filterfrequenz, Lautstärke) wirken soll. Am besten beginnt 
man einmal mit einer Frequenzmodulation durch einen 
LFO. Eine 1 in der rechten oberen Ecke der KSV-Matrix zum 
Beispiel schaltet LFO 0 auf die Frequenz von Stimme 1. 
Dann muß die Modulationsquelle selbst eingestellt werden. 
Ein LFO ist erst dann wirksam, wenn: 

- die Frequenz LFOF größer als 0 ist, 

- die Amplitude LFOA größer als 0 ist, 

- MODUS auf RUN geschaltet ist, 

- bei KURVE=SQUARE die Pulsweite LFOP größer als 0 
ist. 

Der Software-Hüllkurvengenerator ist wirksam, wenn: 

- Attack A größer als 0 ist, 

- die Amplitude EGA größer als 0 ist, 

- MODUS auf RUN geschaltet ist. 

Für vernünftige Hüllkurven sollten auch die Parameter 
Decay D und Release R größer als 0 gewählt werden. Der 
Soft-Hüllkurvengenerator wird durch die SPACE-Taste aus¬ 
gelöst. Durch Shift-SPACE kann man die Triggerung des 
Soft-EG (EG = Envelope Generator) an das normale Spie¬ 
len von Tönen koppeln. Ein weiteres Shift-SPACE hebt die¬ 
se Kopplung wieder auf. 

7. Die Tiefe der Modulationen 

Die Modulationstiefe (das ist der Grad der Modulations¬ 
wirkung) wird über die Amplitude der Modulationsquelle 
(LFOA beziehungsweise EGA) eingestellt. Für die Modula¬ 
tion von Pulsweite, Filterfrequenz und Lautstärke werden 
relativ große Modulationsamplituden benötigt, damit ein Ef¬ 
fekt hörbar wird (etwa ab 20 aufwärts). Die Frequenzmodu¬ 
lation reagiert dagegen empfindlicher. Amplituden bis ma¬ 
ximal etwa 10 werden als Vibrato empfunden, das heißt, der 
modulierte Ton wirkt noch einheitlich in seiner Tonhöhe, 
wird aber breiter und lebendiger empfunden. Amplituden 
über 10 bewirken einen zunehmenden Heulton- oder Sire¬ 


neneffekt. Natürlich hat auch die Modulationsgeschwindig¬ 
keit LFOF einen starken Einfluß auf das Klangbild. 

8. Sprünge zwischen zwei Tönen 
Durch Frequenzmodulation mit einer Rechteckkurve er¬ 
reicht man, daß die Frequenz nicht auf- und abgleitet, son¬ 
dern zwischen zwei Werten hin und her springt. Durch ge¬ 
eignete Wahl der Amplitude erhält man musikalisch sinn¬ 
volle Intervalle. Beispiele: 


LFOA 

Intervall 

46 

kleine Terz 

61 

große Terz 

76 

Quarte 

104 

Quinte 

176 

Oktave 


9. Speichern 

Man sollte nicht versäumen, die vielleicht mühevoll ge¬ 
fundenen Sounds zu speichern. Im Untermenü »Sounds« 
kann man bis zu 24 Sounds ablegen und mit Namen verse¬ 
hen. Im Untermenü »Disk« kann man dann eine Sound- 
Bank speichern. Um einen Sound von einer Bank in eine an¬ 
dere zu übertragen, lädt man zuerst die Quell-Bank, wählt 
den gewünschten Sound an und wählt dann die Ziel-Bank. 
Durch diesen Vorgang geht der angewählte Sound nicht ver¬ 
loren und kann dann in der Ziel-Bank abgelegt werden. 

Beispielsounds 


Die folgenden zehn Beispiele (Bild 9a und 9b, Seite 116/117) 
sollen einen Einblick geben, welche Klänge man dem SID 
entlocken kann. Die Parametersätze sind in einer Form ab¬ 
gedruckt, die an die Erscheinungsweise in den einzelnen 
Unterme" ,s angelehnt ist. Bei den Parametergruppen 
SCHALTER und MODUS im Filter-Menü bedeuten Stern¬ 
chen, daß das entsprechende Bit aktiviert ist (reverse Dar¬ 
stellung auf dem Bildschirm). 

Beispiel 1: MOLL WEIT 

Eine relativ einfache Einstellung, bei der alle drei Stim¬ 
men in einem Mollakkord zusammenklingen. »Weit« be¬ 
deutet, daß die Einzeltöne nicht innerhalb einer Oktave lie¬ 
gen. Die Hüllkurven unterscheiden sich in ihren Decay- und 
Release-Werten. Dadurch klingt der tiefste Ton am läng¬ 
sten nach. Ein ganz leichtes Vibrato (LFOA=1) durch LFO 
Overleiht dem Klang Leben. Man erhöhe einmal die Grund¬ 
frequenz von Stimme 2 von D# auf E4, um einen Durak¬ 
kord zu erhalten. 

Beispiel 2: STRINGS 

Dieser Sound klingt durch reichhaltigen Modulationsein¬ 
satz sehr voll, fast orchestral (im Rahmen der SID-Qualität). 
Es wurde dreimal die Rechteckkurve gewählt, die durch 
PW-Modulation räumliche Fülle erhält. Die lange Attack- 
Zeit (A=5) in der Hüllkurve von Stimme 2 bewirkt ein verzö¬ 
gertes Einsetzen. Wenn man bei dieser Einstellung stacca- 
to (das heißt abgehackt) spielt, bleibt Stimme 2 fast unhör- 



Bild 9. Durch Überlagerung von Rechteck- und/oder 
Sägezahnkurven erhält man Treppenkurven 
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bar. LFO 0 und 1 sorgen für Vibrato (Frequenzmodulation). 
LFO 0 moduliert Stimme 1, LFO 1 Stimme 2. Stimme 3 wird 
von beiden LFOs moduliert. Dabei überlagern sich die Kur¬ 
venformen der beiden LFOs und bilden eine Schwebung, 
die sich im Auf- und Abschwellen des Vibrators in Stimme 
3 (fast aufdringlich) bemerkbar macht. Dieser Effekt soll an 
eine Solovioline im Orchester erinnern. Die LFOs 2 und 3 
sorgen durch PW-Modulation für noch mehr Klangfülle. 
Beispiel 3: KLICK-WAH 

Eine Kombination zweier Effekte. Die auf einen hohen 
Grundton eingestellte Stimme 2 sorgt durch einen schnel¬ 
len Attack-Decay-Hüllkurvenverlauf (mit Sustain=0) für 
den Klick-Effekt. Stimme 1 wird durch einen Tiefpaß mit 
großer Resonanz (RES=14) geschickt. Der Soft-EG steuert 
über die Filterfrequenz das Offnen und Schließen des Fil¬ 
ters. Bei der angegebenen Parametrisierung wird das Re¬ 
sultat lautmalerisch besser durch »au« als durch »wah« be¬ 
schrieben. Man sollte hier unbedingt einmal mit der Einstel¬ 
lung des Soft-EG experimentieren. Durch Verlängerung 
der Attack-Zeit erhält man ein »wahhau«, durch Spiegelung 
der Hüllkurve (FORM = -) kann man ein »auahh« erzielen. 
Bei diesen Versuchen sollte man auch hin und wieder die 
Filterfrequenz variieren. 

Beispiel 4: SIRENE 

Hier wird die Wirkung einer starken Frequenzmodulation 
demonstriert. Die Frequenzen der drei Stimmen sind so 
eingestellt, daß sie einen »schräg« klingenden Akkord bil¬ 
den. Alle drei Stimmen werden gleichermaßen langsam 
und tief von LFO 0 moduliert. Hier sollte man einmal unter¬ 
schiedliche LFO-Kurvenformen und LFO-Frequenzen aus¬ 
probieren. Die Zuschaltung von LFO 1 (MODUS auf RUN 
setzen) bewirkt durch Überlagerung einer schwächeren 
aber schnellen Modulation einen dramatischen Effekt. 
Beispiel 5: STURM 

Alle drei Stimmen erzeugen Rauschen. Die Stimmen 
werden wie bei der Sirene langsam und tief moduliert, aller¬ 
dings jede durch einen eigenen LFO. Da die LFOs in ihrer 
Frequenz unterschiedlich eingestellt sind, erhalten die drei 
Rauschquellen unabhängig voneinander Lebendigkeit. 
Darüber hinaus sorgt das eigens durch LFO 0 modulierte 
Filter für klangliche Abwechslung. Das Filter ist hier als so¬ 
genannte Bandsperre geschaltet (LP und HP aktiv). 
Beispiel 6: RADIO 

Dieser Effekt soll an das Pfeifen erinnern, das beim 
Durchstimmen eines Kurzwellenempfängers entsteht. Des 
weiteren ist ein Funkfernschreib-Signal zu hören (schnelle 
Folge hoher Töne). Das Durchstimmgeräusch liefert Stim¬ 
me 3, die durch Stimme 2 ringmoduliert wird. Stimme 2 ist 
selbst nicht hörbar, beeinflußt aber wesentlich den Klang 
von Stimme 3. Beide Stimmen werden sehr langsam und 
mit unterschiedlicher Frequenz moduliert. Die LFOs 0 und 
3 erzeugen dagegen schnelle Rechtecksignale, die, zu ei¬ 
ner Treppenkurve überlagert, Stimme 1 zu einer schnellen 
Folge hoher Töne anregen. 

Beispiel 7: SEQUENZER 

Ein Sequenzer ist ein Gerät, das eine vorprogrammierte 
Tonfolge wiederholt abspielt. Durch Modulation mit Trep¬ 
penkurven kann man Sequenzer-artige Effekte erreichen. 
Treppenkurven erhält man duch Überlagerung von 
Rechteck- und Sägezahnkurven. Die Skizze (Bild) gibt Bei¬ 
spiele dafür. Wenn man Sägezahnkurven einsetzt, muß 
man auf die Amplitudenverhältnisse achten, damit die 
Treppenstufen »gerade« bleiben. 

Das vorliegende Beispiel klingt am besten, wenn man zu¬ 
nächst die Grundeinstellung anwählt und dann den vorher 
abgespeicherten Parametersatz. Dadurch werden zu¬ 
nächst alle LFOs in den RESET-Zustand versetzt und an¬ 
schließend synchron gestartet. Sie laufen dann mit einer 
wohldefinierten Phasenbeziehung zueinander ab. 


Beispiel 8: GEJAMMER 

Hier moduliert der Soft-EG die Frequenz aller drei Stim¬ 
men. Jeder Tastendruck erzeugt dadurch ein Aufheulen, 
das an Katzengejammer erinnert. Der Effekt wird noch da¬ 
durch verstärkt, daß der Soft-EG auch das Filter und die 
Lautstärke moduliert. Eine weitere Frequenzmodulation 
durch zwei LFOs verleiht dem Ton nach der Decay-Phase 
des Soft-EG einen zusätzlichen klagenden Charakter. 
Beispiel 9: MIKROCHIP 

Fünf LFOs erzeugen durch Überlagerung Treppenkur¬ 
ven mit quasizufälligem Verlauf. Die dadurch schnell und 
tief modulierten Stimmen werden noch zusätzlich gegen¬ 
seitig ringmoduliert. Dadurch bekommt der Gesamtklang 
einen metallischen Charakter. Am besten klingt diese Ein¬ 
stellung bei hohen Tönen. 

Beispiel 10: BULLDOZER 

Hier werden Motorengeräusche simuliert. Stimme 3 er¬ 
zeugt ein Brummen als Grundlage. Stimme 2 erzeugt über 
das Filter Rauschen. Das Filter wird in schneller Folge 
durch LFO 0 moduliert. Dadurch wird aus dem Rauschen 
das Stampfen eines schweren Dieselmotors. LFO 2 modu¬ 
liert ebenfalls das Filter, allerdings mit sehr niedriger Fre¬ 
quenz. Dadurch ändert das Dieselstampfen periodisch sei¬ 
nen Klang. Am interessantesten ist aber Stimme 1. Sie er¬ 
zeugt bereits ohne Modulation ein Geräusch, das an eine 
schwere, trockengelaufene Stahlkette erinnert. Der Effekt 
kommt durch die Kombination zweier Kurvenformen 
(Rechteck und Dreieck) bei niedriger Oszillatorfrequenz 
zustande. Eine Modulation durch LF01 läßt die Kette aller¬ 
dings noch realistischer rasseln. Drückt man die SPACE- 
Taste, so werden die Frequenzen von Stimme 3 (Grundge¬ 
räusch) durch den Soft-EG heruntermoduliert. Man kann 
sich dabei vorstellen, wie sich die schwere Maschine äch¬ 
zend ;,ns Erdreich wühlt. Bild 25 zeigt die Parameter für die 
einzelnen Sounds in der Übersicht. 

Musik selbst programmieren 


Nun endlich werden wir auf die Programmierung von Mu¬ 
sikstücken und die »Sequenzer«-Funktion des Sound- 
Editors näher eingehen. 

Zunächst einige Grundlagen zum Sequenzer. Unter ei¬ 
nem Sequenzer versteht man ein Gerät oder Programm, 
das einen Synthesizer mit einer vorprogrammierten Tonfol¬ 
ge ansteuert. Die zentrale Rolle spielt dabei das genaue 
Einhalten eines programmierbaren Zeitmaßes. 

Musikstücke werden üblicherweise in Takte von etwa ein 
bis vier Sekunden Länge eingeteilt. Am gebräuchlichsten 
ist der 4 /4Takt, der die Länge einer ganzen Note hat. Andere 
gebräuchliche Taktarten sind %, %, %, *U, 5 U, %. Diese An¬ 
gaben betreffen nur die Zählweise der Takte, nicht das Tem¬ 
po eines Musikstücks. So sind zum Beispiel 3 U- und 6 /e-Takt 
bis auf die Zählweise vollkommen identisch. 

Die Notenlängen werden in Bruchteilen der ganzen Note 
angegeben: 


Ganze Note 

° | 

Halbe Note 

J 

l 

Viertelnote 

J 

Achtelnote 


Sechzehntelnote 

ß 
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Es kommen auch ungeradzahlige Vielfache dieser No¬ 
tenlängen vor. Durch Punktierung kennzeichnet man die 
Verlängerung einer Note um die Hälfte ihrer ursprünglichen 
Länge: 



Alle diese Notenlängen passen in ein Raster, welches ei¬ 
ne ganze Note in 16 oder 32 gleiche Zeitabschnitte teilt. Es 
werden aber häufig auch sogenannte Triolen (Drittelnoten) 
eingesetzt. Zum Beispiel Achteltriolen, das sind drei gleich¬ 
lange Noten mit der Länge einer Viertelnote. Aus diesem 
Grund sollte das Zeitraster (die Anzahl der Zeitabschnitte, 
in die der Sequenzer eine ganze Note einteilt) auch den 
Faktor 3 enthalten. Ein sinnvolles Zeitraster ist zum Beispiel 
96 (=3 x 32). 


Das Tempo wird in der Musik in Schlägen pro Minute 
(beats per minute: bpm) gemessen. Ein Schlag entspricht da¬ 
bei einer Viertelnote. Der sinnvolle Bereich für dieses Maß 
liegt bei etwa 40 bis 240 bpm. Beim schnellen Tempo 240 
bpm dauert eine ganze Note genau eine Sekunde. Der Se¬ 
quenzer muß dann 96 Schritte pro Sekunde ausführen. 

Programmtechnik 

Zunächst ein paar grundsätzliche Erläuterungen. 

Ein Sequenzer ist von der zu erbringenden Funktion her ei¬ 
gentlich ein sehr einfaches Programm. Seine Leistungen 
sind schnell aufgezählt: 

- Tonhöhen steuern 

- Triggerung der einzelnen 
Stimmen (GATE ON und GATE OFF) 

Diese Steuerungen müssen zeitgenau und unabhängig 
voneinander für drei Stimmen erfolgen. Darüber hinaus 
wären einige Zusatzfunktionen sinnvoll: 

- programmierbare Tempoänderungen 

- programmierbare Soundwechsel 


MULL WEIT 


AKTIVE STIMMEN: 

1 2 

! 3 



F 

PW 

A 

D S 

R 

CONTROL PORTA 

C 3 

0 2048 

0 

13 8 13 

0010000 0 


D#4 

0 2048 

0 

12 8 

1 12 

0010000 0 


G 5 

0 2048 

0 

11 E 

1 11 

0010000 0 


FILTF RES 

SCHALTER 

MODUS LAUT 



0 0 


FILT1 


LP 12 





FILT2 

BP 





FILT3 

HP 





FILTEX 

30FF 


LFO 

LFOF LFOP 

LFOA 

KURVE MODUS 

KSV 

0 

5000 

0 

1 

TRIAN RUN 

00000001 

1 

0 

0 

0 

TRIAN RESET 

00000001 

2 

0 

0 

0 

TRIAN RESET 

00000001 

3 

0 

0 

0 

TRIAN RESET 

00000000 

4 

0 

0 

0 

TRIAN RESET 

00000000 

5 

0 

0 

0 

TRIAN RESET 

00000000 

6 

0 

0 

0 

TRIAN RESET 

00000000 







00000000 

A 

D 

s 

R 

EGA 

FORM MODUS 


0 

0 

0 

0 

0 

+ RESET 


STRINGS 






AKTIVE STIMMEN: 

1 2 

3 



F 

PW 

A 

D S 

R 

CONTROL PORTA 

G 3 

0 1040 

5 

10 8 

12 

0100000 80 


C 2 

0 1040 

13 

10 8 

1? 

0100000 80 


C 5 

10 2048 

11 

10 8 

10 

0100000 80 


FILTF RES 

SCHALTER 

MODUS LAUT 


500 15 


FILT1 


**LP** 15 




*«FILT2»* 

BP 





FILT3 


HP 





FILTEX 

30FF 


LFO 

LFOF LFOP 

LFOA 

KURVE MODUS 

KSV 

0 

6B00 

0 

8 

TRIAN RUN 

00000001 

1 

8000 

0 

8 

TRIAN RUN 

00000010 

2 

2600 

0 

90 

TRIAN RUN 

00000011 

3 

400 

0 

90 

TRIAN RUN 

00000100 

4 

0 

0 

0 

TRIAN RESET 

00001000 

5 

0 

0 

0 

TRIAN RESET 

00000100 

6 

0 

0 

0 

TRIAN RESET 

00000000 







00000000 

A 

D 

S 

R 

EGA 

FORM MODUS 


0 

0 

0 

0 

0 

+ RESET 


KLICK-WAH 






AKTIVE STIMMEN: 

1 2 





SOFT-EG-KOPPLUNG AKTIV 


F PW 
C 3 0 1050 

C 5 0 2048 

G 5 0 2048 


A D S R CONTROL PORTA 
0 10 8 12 0100000 0 

0201 0100000 0 

0303 0100000 0 


FILTF 

350 


RES 

14 


SCHALTER 

**FILT1** 

FILT2 

FILT3 

FILTEX 


MODUS LAUT 
**LP** 15 

BP 
HP 
30FF 


LFO 

LFOF 

LFOP 

LFOA 

KURVE 

MODUS 

KSV 

0 

6000 

0 

6 

TRIAN 

RUN 

00000001 

1 

0 

0 

0 

TRIAN 

RESET 

00000000 

2 

0 

0 

0 

TRIAN 

RESET 

00000000 

3 

0 

0 

0 

TRIAN 

RESET 

00000000 

4 

0 

0 

0 

TRIAN 

RESET 

00000000 

5 

0 

0 

0 

TRIAN 

RESET 

00000000 

6 

0 

0 

0 

TRIAN 

RESET 

10000000 







00000000 

A 

D 

S 

R 

EGA FORM MODUS 


125 

SO 

60 

30 

120 

+ RUN 



SIRENE 


onui 


AKTIVE 

STIMMEN: 

1 

2 3 



F 


PW 

A 

D 

S R 

CONTROL PORTA 

C 3 

0 

2048 

o 

10 

8 10 

0010000 1 


D#3 

0 

2048 

0 

10 

8 10 

0010000 1 


F 3 

0 

2048 

o 

10 

8 10 

0010000 1 


FILTF 

RES 

SCHALTER 

MODUS LAUT 


0 

0 


FILT1 

LP 15 






FILT2 

BP 






FILT3 

HP 






FILTEX 

30FF 


LFO 

LFOF LFOP 

LFOA 

KURVE MODUS 

KSV 

0 


150 

0 

170 

TRIAN RUN 

00000011 

1 

7000 

128 

20 

TRIAN RESET 

00000011 

2 


0 

0 

o 

TRIAN RESET 

00000011 

3 


0 

0 

0 

TRIAN RESET 

00000000 

4 


0 

0 

o 

TRIAN RESET 

00000000 

f 


0 

0 

0 

TRIAN RESET 

00000000 


0 

0 

0 

TRIAN RESET 

00000000 

A 







00000000 


D 

S 

R 

EGA 

FORM MODUS 


0 


0 

0 

0 

0 

+ RESET 


STURM 







AKTIVE 

STIMMEN: 

1 

2 3 



SUSTAIN AKTIV 





F 


PW 

A 

D 

S R 

CONTROL PORTA 

C 3 

0 

2048 

0 

10 

8 10 

1000000 0 


C 4 

0 

2048 

8 

10 

B 10 

1000000 0 


C 5 

0 

2040 

0 

10 

B 10 

1000000 0 


FILTF 


RES 

SCHALTER 

MODUS LAUT 


1000 


12 

**FILT1** 

»*LP** 10 





»«FILT2** 

BP 





**FILT3** 

*»HP»» 






FILTEX 

SOFF 


LFO 

LFOF LFOP 

LFOA 

KURVE MODUS 

KSV 

0 


130 

0 

250 

TRIAN RUN 

00000010 

1 


160 

0 

250 

TRIAN RUN 

00000100 

2 

200 

0 

250 

TRIAN RUN 

00001000 

3 


1 10 

0 

250 

TRIAN RUN 

00000000 

4 


0 

0 

0 

TRIAN RESET 

00000000 

5 


0 

0 

0 

TRIAN RESET 

00000000 

6 


0 

0 

0 

TRIAN RESET 

00000001 








00000000 

A 


D 

S 

R 

EGA 

FORM MODUS 


0 


0 

0 

0 

0 

+ RESET 


RADIO 









AKTIVE STIMMEN: 1 2 3 


F PW 
A#5 0 2048 

F#4 0 2048 

C 5 0 2048 

FILTF RES 

0 0 


A D 
0 10 
0 10 
0 10 


SCHALTER 

FILT1 

FILT2 

FILT3 

FILTEX 


R CONTROL PORTA 
10 0100000 7 
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10 0001010 10 

MODUS LAUT 
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BP 
HP 
30FF 


LFO LFOF LFOP LFOA KURVE MODUS 


0 

1 

2 

3 

4 

5 

6 


10000 

90 

135 

4000 

0 

0 

0 

D 

0 


5B 

128 

128 

100 

0 

0 

0 

S 

0 


70 SQUARE 
70 TRIAN 
70 TRIAN 
50 SQUARE RUN 
0 TRIAN RESET 
0 TRIAN 
0 TRIAN 


RUN 

RUN 

RUN 


RESET 

RESET 


R EGA FORM MODUS 
0 0+ RESET 


KSV 

00001001 

00800010 

00000100 

00000000 

00000000 

00000000 

00000000 

00000000 
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- programmierbare Änderung der Inhalte beliebiger Spei¬ 
cherplätze (Parameteränderung) 

Alle diese Forderungen erfüllt der Sequenzer, den wir Ih¬ 
nen vorstellen werden. 

Einige Anforderungen sind auch an die Struktur der Da¬ 
ten zu stellen: 

Die Datenstrukturen 

Um ein Musikstück in eine computergerechte Form zu 
bringen, muß man im wesentlichen die Tonhöhe und die 
Länge der einzelnen Noten codieren. Beim Einsatz mehre¬ 
rer, verschieden klingender Stimmen muß man außerdem 
jede Note eindeutig einer Stimme zuordnen. Die hier ver¬ 
wendete Datenstruktur (Bild 10) verfolgt mit ihrem etwas 
komplizierten Aufbau zwei Ziele: 

- Sparsamer Umgang mit dem Speicher 

- Gute Editiermöglichkeiten. (Ein Editorprogramm in Basic 
folgt weiter unten.) 

Tracks 

Die Steueranweisungen werden für die drei Stimmen ge¬ 
trennt in drei sogenannten Tracks (Tonspuren) gespeichert. 
Ein Track ist eine zusammenhängende Folge von 1-Byte- 
Kommandos. Das häufigste Kommando dürfte das Ton- 
Kommando sein. Die Tonhöhe wird aus einer Oktavnum¬ 
mer und einer Tonnummer (siehe Bild 11), die in den beiden 
Nibbles (= Halbbytes) eines Bytes stehen, ermittelt. Das 
Programm benötigt dazu lediglich eine Tabelle der Fre¬ 
quenzen der höchsten Oktave. Die Frequenzen der niedri¬ 
geren Oktaven werden durch Teilung durch Zweierpoten¬ 
zen errechnet. Eine Division durch 2 wird durch einen einfa¬ 
chen Rechts-Shift realisiert. Die Dauer des Tones ist nicht 
Bestandteil des Ton-Kommandos. Sie wird durch das Zeit- 
Kommando voreingestellt. Da häufig mehrere Töne mit 
gleicher Länge aufeinanderfolgen, genügt ein einziges 
Zeit-Kommando, um die Tonlänge (siehe Bild 12) einzustel¬ 
len. Dabei wird zwischen einer GATE-ON- und einer GATE- 


OFF-Phase unterschieden, deren Längen zusammenge¬ 
nommen die gewünschte Tonlänge ergeben. 

Beispiel: GATE-ON-Zeit = 5 
GATE-OFF-Zeit = 7 

Gesamtzeit = 12 

Das entspricht einer kurz angeschlagenen Achtelnote 
(bei 96 Zeitschritten pro ganzer Note). Die GATE-ON-Zeit ist 
im Bereich 1 bis 96, die GATE-OFF-Zeit im Bereich 0 bis 30 
einstellbar. Der Sequenzer setzt nach Ablauf der GATE- 
ON-Zeit das GATE-Bit der entsprechenden Stimme im SID 
zurück und wartet dann die GATE-OFF-Zeit ab. Ist diese 0, 
so wird natürlich sofort der nächste Ton gespielt. Man kann 
aber auch explizit Pausen programmieren. Ihre Länge ist 
die Summe aus GATE-ON und GATE-OFF-Zeit. 

Der Code $00 ist zur Kennzeichnung für das Track-Ende 
vorgesehen. Die Codes $F8 bis $FF sind für Sonderfunktio¬ 
nen reserviert, die für eine spätere Erweiterung des Se¬ 
quenzers gedacht sind. Angesprungen werden sie über ei¬ 
ne Tabelle von Vektoren, die im Moment nur in den Pro¬ 
grammteil zur Ausführung des nächsten Kommandos füh¬ 
ren, also nichts bewirken. Sinnvolle Sonderfunktionen: 

- Änderung von Soundparametern 

- Wahl eines ganzen Parametersatzes (Soundwechsel) im 
Zusammenhang mit dem Programm Modulator 

- Tempowechsel 

Sequenzen 


Für jede der drei Stimmen gibt es eine Folge von Komman¬ 
dos, einen Track. Die drei Tracks werden zu einer Sequenz 
zusammengefaßt. Eine Sequenz ist hier ein zusammen¬ 
hängender Abschnitt eines Musikstücks, der einen einzi¬ 
gen Jon, einen Takt oder auch das ganze Stück umfassen 
kann. Den drei Tracks gehen drei Zeiger auf die Track- 


SEQUENCER 

MIKROCHIP 

AKTIVE STIMMEN: 

1 2 3 




AKTIVE STIMMEN: 

1 2 
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F 

PW 

A 
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CONTROL PORTA 

F 

PW 

A 
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R 
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0 2046 
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10 
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0 
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0 2046 

0 
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0 2048 
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0 
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0 
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1 
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44 SAWUP RUN 
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1 
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60 

SQUARE RUN 


00011000 

2 
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2 
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80 
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3 
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3 
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60 
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4 
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0 
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70 
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30 
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0 

0 
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0 

8600 

0 
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2 
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0 
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0 

0 

0 TRIAN RESET 
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4 

0 

0 

0 

TRIAN RESET 
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5 

0 

0 

0 TRIAN RESET 
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5 

0 

0 

0 

TRIAN RESET 
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6 

0 

0 

0 TRIAN RESET 
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6 

0 

0 

0 

TRIAN RESET 
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0 
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Soquenz l 



Bild 10. Sequenzerdatenstruktur 


Startadressen voran. Obwohl es sich aus Gründen der 
Übersichtlichkeit empfiehlt, die Sequenzen wie in Bild TO 
zusammenhängend in der Folge Zeiger-Track 1, -Track 2, 
-Track 3 zu speichern, besteht dazu kein Zwang. Es müssen 
lediglich die drei Track-Zeiger einer Sequenz und die Tracks 
in sich Zusammenhängen. 

Sequenzfolgeliste 

Um eine Sequenz zu wiederholen, muß man sie nicht 
zweimal programmieren, sondern kann sie wie ein Unter¬ 
programm mehrmals aufrufen. Die Sequenzfolgeliste ent¬ 
hält dazu die Startadressen der Sequenzen in der Reihen¬ 
folge, in der diese gespielt werden sollen. Dabei können die 
gleichen Adressen natürlich mehrfach auftreten. Unter der 


Kommando 

Kommandoformate innerhalb der Tracks 

Interpretation 

%0000 0000 

Track-Ende 


%ottttttt 

Zeitvorgabe 

t = 1...96 GATE-ON-Zeit: =t-m 
t = 97...127GATE-OFF-Zeit: = t-97 

%lmmm nnnn 

nächster Ton 

m = 0...6 Oktaven 
n = 0...11 Tonnummer 
n = 12...15 Pause 

%11101111 

Pause 

(Standardcode $EF) 

%1111 Ifff 

Sonderfunktion 

f = 0...7 Funktionsnummer 


Tabelle 5. So programmiert man einen Track 


Startadresse einer Sequenz wird hier die Adresse des Zei¬ 
gers auf Track 1 verstanden. Die Sequenzfolgeliste enthält 
für jede Sequenz außer dem Zeiger noch ein drittes Byte, 
das für spätere Erweiterungen vorgesehen ist. Drei Nullen 
schließen die Liste ab. 

Im Normalfall wird man die drei Tracks einer Sequenz 
gleich lang programmieren. Macht man dagegen die 
Tracks unterschiedlich lang, so wiederholt das Programm 
die kürzeren Tracks so lange, bis der längste Track zu Ende 
gespielt ist. Erst dann geht das Programm zur nächsten Se¬ 
quenz über. Dieses Verhalten kann bei manchen Musik¬ 
stücken nützlich sein. Das MSE-Listing 3 enthält einen Mu¬ 
sikdatensatz, bei dem in der zweiten Sequenz der dritte 
Track aus nur vier Tönen besteht, die fortlaufend wiederholt 
werden. Normalerweise hält der Sequenzer an, wenn alle 
Sequenzen gemäß Sequenzfolgeliste durchgespielt sind. 

Das vorliegende Sequenzerprogramm (Listing 4) hat die 
Startadresse 50304 und wird gestartet mit < SYS 50304>. 

Das Programmieren von Musikstücken mit Hilfe der Ta¬ 
belle 5 ist noch etwas mühsam. Mit dem Datensatz aus Li¬ 


sting 5 (»Kobold« aus den »Lyrischen Stücken« von Edvard 
Grieg) kann man den Sequenzer testen. 

Zum Sequenzer gibt es im Sound-Editor ein eigenes Un¬ 
termenü, von dem aus er gestartet und gestoppt werden 
kann. In diesem Untermenü kann man auch das Spieltem¬ 
po und einige weitere Parameter einstellen. Damit liegt ein 
komplettes Programm vor, das von den vielen Möglichkei¬ 
ten her die kommerziell angebotenen Synthesizerprogram¬ 
me für den C 64 übertreffen dürfte. Für die grafische Gestal¬ 
tung gibt es natürlich schönere und aufwendigere Konzep¬ 
te, diese sind aber auch nicht das Thema dieses Kurses. 

Das Komplettsystem 


An Maschinenprogrammen werden vom Sound-Editor 
nachgeladen: MODULATOR, SEQUENCER.OBJ, SEQ. 
ERG.OBJ 

Bei dem letzten Programm (Listing 6) handelt es sich um 
eine Ergänzung zum Sequenzer (Listing 4). Diese Ergän¬ 
zung, die mit dem MSE eingegeben werden muß, ist für den 
Betrieb zusammen mit dem Sound-Editor und mit »Modula¬ 
tor« erforderlich. Die technischen Einzelheiten wurden be¬ 
reits besprochen. 

Um das bis jetzt aufgebaute System von Programmen zu 
testen, kann man den kleinen Musikdatensatz »Test.Song« 
(Tonleiter und Kadenz) aus Listing 7 verwenden. 

Bedienung des Sequenzers 

DerSound-Editorwird geladen und gestartet. Nach einer 
Initialisierungszeit von zirka 30 Sekunden meldet er sich 
mit dem Hauptmenü, von dem aus man mit <A> den Se¬ 
quenzer erreichen kann. Parameter werden mit den Cur¬ 
sor-Tasten angewählt und können mit den F-Tasten verän¬ 
dert werden. Solange allerdings kein Song (= Musikdaten¬ 
satz) geladen worden ist, was in der Titelzeile angezeigt 
wird, kann der Sequenzer nicht gestartet werden. 

Im Untermenü Disk (mit <D> zu erreichen) kann man 
mit <F2> den Musikdatensatz »Test.Song« laden und ge¬ 
langt dann automatisch wieder in das Sequenzer- 
Untermenü. Der Sequenzer kann jetzt mit <F5> gestartet 
und mit <F3> wieder angehalten werden. <F1 > setzt ihn 
an den Anfang des geladenen Songs zurück. 

TEMPO 

Über das Tempofeld kann man die Abspielgeschwindig¬ 
keit im Bereich von 40 bis 480 bpm (beats per minute) ein¬ 
stellen. Geschwindigkeiten über 300 bpm sind allerdings 
musikalisch kaum noch sinnvoll, sondern eher für Klangex¬ 
perimente gedacht. 

MODUS 

Im Song-Modus wird das ganze Stück gemäß Sequenz¬ 
folgeliste gespielt. Der Sequenzmodus ermöglicht es da¬ 
gegen, einzelne Sequenzen beliebig oft zu hören. 

SEQNR 

Im Sequenzmodus erscheint hier die Nummer der ge¬ 
spielten Sequenz. Damit ist die aktuelle Position in der Se¬ 
quenzfolgeliste gemeint und nicht die Nummer der Se¬ 
quenz bei ihrer Definition. Es kann also unter verschiede¬ 
nen Nummern die gleiche Sequenz mehrmals zu hören 
sein. So besteht zum Beispiel »Test.Song« aus zwei Se¬ 
quenzen, einer Tonleiter und einer Kadenz. Die Tonleiter 
wird wiederholt und ist unter den Sequenznummern 1 und 
2 zu hören. Die Kadenz ist unter Nummer 3 zu finden. Im 
Song-Modus hat das SEQNR-Feld keine Bedeutung. 

SOFT-EG 

Die Funktion entspricht der schon bekannten, mit 
<SHIFT SPACE> erreichbaren Kopplung des Soft-EG an 
das Tastenfeld-Spiel. 
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Kleines Fachwörterlexikon der Computermusik 


Frequenz: 

Tonhöhe; Anzahl von Schwingungen pro Sekunde. 

Amplitude: 

Lautstärke; Maximalwert der Frequenz. 

Obertöne: 

Ein Ton eines Musikinstruments ist aus sehr vielen unterschiedlichen Einzel¬ 
tönen zusammengesetzt, die den Klangcharakter des Instruments bestim¬ 
men. Der tiefste Ton dieser Summe ist die Tonhöhe, die wir »hören«. Die restli¬ 
chen Töne sind die Obertöne. 

Filter, das: 

Elektronisches Bauelement. Dämpft die Lautstärken der einzelnen Obertöne 
eines Tones und verändert so seinen Klang. 

Hüllkurve, Attack, Decay, Sustaln, Release: 

Hüllkurve ist der zeitliche Lautstärkeverlauf eines Tones. Beispiel: 

Nach dem Drücken der Taste langsames Lauterwerden des Tons bis zur Maxi¬ 
mallautstärke (Attack-Phase); dann schnelles Absinken (Decay-Phase) bis 
auf einen bestimmten Level (Sustain-Level); nach dem Loslassen der Taste 
schnelles Ausklingen des Tons (Release-Phase). Attack, Decay und Release 
sind Zeiteinheiten, werden also in Millisekunden angegeben. Sustain ist eine 
Lautstärkeeinheit und wird meist in Prozent von der Maximallautstärke ange¬ 
geben. 

Tremolo: 

Während ein Ton erklingt, ändert sich seine Lautstärke schnell. 
Moog-Synthesizer: 

Synthesizer mit fest vorgegebenen Baugruppen, nach seinem Erfinder Moog 
benannt. 

Manual, Keyboard: 

Die Tastatur eines Synthesizers. 

CV, Control Voltage: 

Das Keyboard teilt dem Synthesizer über die Höhe der CV-Spannung mit, wel¬ 
che Taste gerade gedrückt ist. Diese Spannung nennt man auch CV-Gate- 
Signal. 

Oszillator: 

Elektronische Schaltung, die Schwingungen (also auch Töne) erzeugt. 
VCO, Voltage Controlled Oscillator: 

Oszillator, der abhängig von der vom Keyboard gelieferten CV-Spannung die 
gewünschte Tonhöhe erzeugt. 

VCF, Voltage Controlled Filter: 

Filter, das abhängig von der Tonhöhe, also der CV-Spannung, die erzeugten 
Töne filtert. 


EG, Envelope Generator: 

Diese Baugruppe erzeugt die Steuerspannung für den VCA. 

LFO, Low Frequency Oscillator: 

Ein Oszillator, der sehr niedrige Schwingungen erzeugt. Mit Hilfe seiner Steuer¬ 
spannung erhält man in Verbindung mit dem VCA ein Vibrato. 

DCO, DCF und DCA: 

In modernen Synthesizern werden VCO, VCF und VCA nicht über Spannun¬ 
gen, sondern mit Hilfe von Digitalwerten gesteuert. Man spricht dann von 
DCO, DCF und DCA. 

Filterfrequenz: 

Zu Jedem Filter gehören zwei einstellbare Filterfrequenzen: 

Die untere Tonhöhe und die obere Tonhöhe, zwischen denen gefiltert werden 
soll. Wird auch als Eck- oder Grenzfrequenz bezeichnet. 

Filterresonanz: 

Mit diesem einstellbaren Synthesizerparameter kann man die Tonhöhen in 
der Gegend der Filterfrequenz gezielt verstärken. Damit lassen sich interes¬ 
sante Effekte erzielen. 

Vibrato: 

Während ein Ton erklingt, wird seine Tonhöhe schnell periodisch geändert. Der 
Ton schwingt auf und ab, er vibriert. Geigenprofis wenden diese Technik häufig 
an. 

Portamento: 

Bekanntestes Beispiel für ein Portamento Ist der Sirenenton. Man sagt auch, 
ein Ton wird »gezogen». Es werden also zwischen zwei aufeinanderfolgenden 
Tönen keine Halbtonabstände gespielt, sondern alle dazwischenliegenden 
Frequenzen kurz angeschlagen. Der Portamento-Effekt wird meist nur von 
Synthesizern erzeugt. 

Sequenzer: 

Ein Gerät (oder Computerprogramm), das eine von Musik einprogrammierte 
Tonfolge (Melodie) jederzeit wiedergeben kann. Einzelne Klangeffekte wie auch 
Tempoänderungen und ähnliches lassen sich programmieren. 

Modulation: 

Wenn eine Baugruppe durch das Ausgangssignal eines anderen Elements ge¬ 
steuert wird, oder wenn ein Parameter einen zweiten fortlaufend ändert, spricht 
man von Modulation. 

DCO-EG-AM-Gruppe: 

Zusammengefaßte Gruppe aus den Bauelementen »Digital Controlled Oscilla¬ 
tor« (DCO), »Envelope Generator« (EG) und »Amplifier« (AM = Verstärker). 
S1D, Sound Interface Device: 

Der Chip des C64, der die Töne erzeugt. 


Hochpaß-, Bandpaß- und Tiefpaßfilter: 

Filter, das die Obertöne eines Tons dämpft. 

Merkhilfe: 
ein »Hochpaß« läßt hohe, 
ein »Bandpaß« mittlere und 
ein »Tiefpaß« tiefe Obertöne passieren. 

VCA, Voltage Controlled Amplifier: 

Verstärker, der spannungsgesteuert die Hüllkurve eines Tons erzeugt. 


Ein ZI im SID, über das das »Anschlägen« und »Loslassen« einer Klaviertaste 
simuliert wird, um einen Ton zeitlich zu steuern. 

Pulsweite: 

Nur im Zusammenhang mit einem Rechteckton. Der Rechteckton springt in be¬ 
stimmten Zeitabständen zwischen zwei Amplitudenwerten hin und her, er pul¬ 
siert. Das Verhältnis dieser Zeitabstände zueinander bezeichnet man als Puls¬ 
weite. 


SUSTAIN 

Die Sustain-Funktion ist auch beim Sequenzer wirksam. 
Sie verhindert das Rücksetzen der G ATE-Bits der drei Stim¬ 
men. Dadurch klingen die Töne ohne Lautstärkedynamik 
durchgehend auf dem Sustain-Pegel. Während der Se¬ 
quenzer läuft, bleiben alle anderen Funktionen des Sound- 
Editors voll erhalten. Man kann also an einem laufenden 
Musikstück Änderungen an der Klangeinstellung testen. 
Lediglich bei Diskettenoperationen wird der Sequenzer un¬ 
terbrochen. 

Mit dem Leseprogramm für Sequenzer-Daten (Listing 8) 
kann man relativ einfach Song-Dateien erzeugen, die die 



und Note 
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Bild 12. Tonlängen bei 
96 Schritten pro Ganzton 




für den Sequenzer erforderliche Struktur haben. Das Pro¬ 
gramm erzeugt aus einer in DATA-Zeilen abgelegten Folge 
von Noten einen Datensatz mit der entsprechenden Zeiger¬ 
struktur. Die Daten werden direkt hinter die Soundparame¬ 
ter ($9000 bis $9A07), also ab $9A08, gespeichert. Das ge¬ 
schieht in der Reihenfolge: 

- Zeiger auf die Sequenzfolgeliste (2 Byte) 

- Eine oder mehrere Sequenzen, bestehend aus jeweils 1 
bis 3 Tracks 

- Sequenzfolgeliste (enthält die Startadressen der Sequen¬ 
zen in der Reihenfolge, in der sie abgespielt werden sollen). 
Auf Editierfunktionen wurde bei diesem Programm verzich¬ 
tet. Da die Noten in DATA-Zeilen geschrieben werden, kann 
man diese wie Basic-Programme mit dem Bildschirmeditor 
behandeln. 

Syntax der Notendaten 

Ein Song ist in einzelne Sequenzen gegliedert, welche 
wiederum in bis zu drei Tracks (= Tonspuren) zerfallen. Den 
Aufbau macht man sich am besten anhand von Listing 8, 
Zeilen 8000 bis 8820, klar. Dort steht das schon in Listing 
5 in Maschinensprache abgedruckte Musikstück. Jenes ist 
allerdings für den Sequenzer in der jetzigen Form n/chf wei¬ 
ter verwendbar, da es nicht im Speicherbereich ab $9A08 
(dezimal 39432) liegt. Die Zeilen 8100 bis 8130 beschreiben 
eine Sequenz, in der nur Stimme 3 programmiert wird. Der 
Track besteht dabei aus sieben Viertelnoten. Sequenzen 
müssen mit SEQUENZ, (laufende Nummer) eingeleitet 
werden. Die laufende Nummer muß im Bereich 1 bis 200 
liegen. 
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Innerhalb einer Sequenz wird mit TRACK, (1, 2 oder 3) 
angegeben, welcher Stimme die nachfolgenden Noten zu¬ 
zuordnen sind. Man kann in einer Sequenz auch weniger 
als drei Tracks programmieren. Allen nichtprogrammierten 
Tracks ordnet das Generatorprogramm einen 4 Byte langen 
Dummy-Track zu, der nur aus einer Pause besteht und der 
nur einmal im Speicher stehen muß. 

Innerhalb eines Tracks sind dann folgende Daten zuläs¬ 
sig: a-b stellt das Verhältnis zwischen GATE-ON- und 
GATE-OFF-Zeit ein. Voreinstellung ist 1-1, das heißt, beide 
Zeiten sind gleich lang. Bei 1-0 hat die GATE-ON-Zeit die 
maximale Länge, bei 0-1 werden die Noten nur sehr kurz 
angeschlagen. Die Einstellung hat keinen Einfluß auf die 
Gesamtlänge der Noten. Diese wird mit a/b eingestellt. Bei¬ 
spiele sind: 

1/1 ganze Note, 1/2 halbe Note, 1/4 Viertelnote, 1/6 Viertel- 
triole, 3/8 punktierte Viertelnote, 1/8 Achtelnote, 1/12 Achtel- 
triole. 

Die Längenangabe bezieht sich auf alle Noten bis zur 
nächsten Längenangabe. 

Als Notennamen werden die üblichen Bezeichnungen 
C,D,E,F,G,A,H verwendet. Die Notennamen können mit 


»#«(zum Beispiel F#=Fis) zur Erhöhung um einen Halb¬ 
ton oder mit »B« (zum Beispiel EB=Es) zur Erniedrigung 
um einen Halbton ergänzt werden. Die Notennamen müs¬ 
sen mit einer Oktavnummer zwischen 0 und 6 versehen 
sein. Der Kammerton a mit 440 Hz hat in dieser Schreibwei¬ 
se den Namen A3. 

P kennzeichnet eine Pause, für die ebenfalls die Längen¬ 
einstellung a/b gilt. 

SEQUENZFOLGE, nl, n2, n3,...,0. Diese Anweisung darf 
an beliebiger Stelle stehen und muß einmal vorhanden 
sein. Sie stellt die schon erwähnte Sequenzfolgeliste dar, 
von der die Abspielreihenfolge der Sequenzen gesteuert 
wird. Die Sequenzen nl, n2 und so weiter müssen natürlich 
definiert werden. Die Liste wird mit einer 0 abgeschlossen. 

ENDE schließt den Datensatz ab. 

Am Ende eines Generatorlaufs kann man den erzeugten 
Datensatz speichern. Dieser kann dann vom Sound-Editor 
geladen werden. Dem an Computermusik interessierten 
Anwender stehen nun leistungsfähige Programme zum Ex¬ 
perimentieren und zur Realisierung seiner Ideen zur Verfü¬ 
gung. 

(Thomas Krätzig/kn) 
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Listing 1. »Modulator«, das Kern¬ 
stück des späteren Sound-Editors. 
Bitte geben Sie dieses Listing mit 
dem MSE (Seite 158) ein. 


0 IF 

A>1 THEN RETURN 

< 169> 

10BB 

REM 

<044> 

1B05 

REM 

<049> 

1010 

REM 

<054> 

1B15 

REM 

<059> 

1020 

REM 

<064> 

1025 

REM 

<071 > 

1030 

REM 

<076> 

1035 

REM 

<081 > 

1040 

REM 

<086> 

1045 

REM 

<091 > 

1050 

REM 

<096> 

1055 

REM 

<101> 

1060 

REM 

< 106> 

1065 

IF M=7 THEN 7665 

<212> 


1068 IF M=7.5 THEN 7960 <175> 

1070 REM <116> 

1075 REM <121> 

1080 IF A=0 THEN A=.1:LDAD"MODULATOR",8,1 <029> 

1082 IF A=.l THEN A=.2s LOAD"SEQUENCER.OBJ" 

,S,1 <0I3> 

1084 IF A=.2 THEN A= 1:LOAD“SEQ.ERB.OBJ",8 

,1 <097> 

1085 REM <131> 

1120 REM <166> 

1130 POKE 56,144s CLR <225> 

1140 REM <1B6> 


Listing 2. Der »Sound-Editor«, bitte mit dem 
Checksummer (Seite 158) eingeben 
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SONDERHEFT 26 












C64 


MUSIK 


1150 REM 

< 196> 

2815 REM 

<081 > 

1160 DIM V/.(8,255> ,TN7.(255> ,TH(24> 

<255 > 

2820 IF A>135 OR A<133 THEN RETURN 

<075> 

1165 DIM BF(2>,T<2>,D(2),0F(2),S(2) 

<025> 

2825 B=A-132 :REM B=l,2,3 

<208> 

1170 DIM CI(2),C(2),AD(2),SR(2> 

<206> 

2830 POKE PA,(PEEK(PA)AND 249>0R(B*2> 

< 157> 

1175 DIM BL*(6>,KV*(3),KF*(6>,MD*(3) 

<225> 

2835 SYS PR,7,33,F2*;MD*(B):RETURN 

<002> 

11B0 DIM TN*(11> 

<237> 

2840 REM 

<108> 

1185 REM 

<231 > 

2845 REM 

< 113> 

1190 GOSUB 8000 :REM INITIALISIERUNGEN 

< 131 > 

2850 POKE PA,PW AND 7:POKE PA+1,INT(PW/8) 

<037> 

1200 GOSUB 4000 sREM HAUPTMENUE 

<032> 

2855 L=LEN(STR*(PW>> 

< 116> 

1210 REM 

<000> 

2860 SYS PR,5,2,BL*(5-L>;F2*;PW:RETURN 

<007> 

1500 REM , 

<036> 

2865 REM 

< 133 > 

1510 REM 

<046> 

2870 REM 

<138> 

1520 REM 

<056> 

2B75 RF=(RF AND 15)+16*PW:P0KE PA,RF 

<221 > 

1530 GET A*:IF A*="" THEN 1530 

< 119> 

2880 L=LEN(STR*(PW)) 

< 141 > 

1540 A=ASC(A*) 

< 166> 

2885 SYS PR,5,9,BL*(3-L>:F2*:PW:RETURN 

<166> 

1550 SYS GS,V7.(M,A> : REM BERECHN. GOSUB 

<247> 

2890 REM 

<158> 

1560 GOTO 1530 

<152> 

2895 REM 

< 163> 

2000 REM 

<02B> 

2900 IF A>136 OR A<133 THEN RETURN 

<028> 

2010 REM 

<03B> 

2905 B=A—133 :REM B=0,l,2,3 

< 199> 

2020 REM 

<048> 

2910 X—2TB:X1=255—X:REM MASKEN 

<225> 

2025 POKE 650,0 

< 130> 

2915 Y=RF AND X 

< 119> 

2030 F=TH(TN7.(A> > s AD=M0+72: X=;PEEK < AD) 

<211 > 

2920 RF=(RF AND XI)OR(X-Y):POKE PA,RF 

<061 > 

2035 IF S(0> THEN SYS DO,MO ,F*BF(0):POK 


2925 Y=—128*(Y=0):AD=1024+(5+B)*40+15 

<206> 

E SI+4 ,C1(0) 

<100> 

2930 FOR I=AD TO AD+5 

< 170> 

2040 IF Stl) THEN SYS D0,M0+7 ,F*BF(l):POK 


2935 : POKE I,(PEEK(I)AND 127)OR Y 

<172> 

E SI+11,C1(1) 

< 176> 

2940 NEXT:RETURN 

<085> 

2050 IF S(2) THEN SYS D0.M0+14,F*BF(2):POK 


2945 REM 

<213> 

E SI+18,C1(2) 

< 12B> 

2950 REM 

<218> 

2090 IF EG THEN POKE AD,X OR 1 

<020> 

2955 IF A>136 OR A<133 THEN RETURN 

<0B3> 

2110 IF SU THEN POKE 650,128:RETURN 

<044> 

2960 B=A-129 :REM B=4,5,6,7 

<046> 

2120 IF PEEK <203>064 AND PEEK(198)=0 THEN 


2965 X=2tB:X1=255—X:REM MASKEN 

<024> 

2120 

<096> 

2970 PW=PEEK(PA):Y=PW AND X 

<222> 

2130 POKE AD,X AND 254 

<236> 

2975 POKE PA,(PW AND Xl)OR(X-Y) 

<223> 

2140 POKE SI+4 ,C<0> 

<012> 

2980 Y=—128*(Y=0):AD=1024+(1+B)*40+25 

<002> 

2150 POKE SI+11,C<1):POKE SI+1B,C(2) 

<022> 

2985 FOR I=AD TO AD+3 

<209> 

2160 POKE 650,12B:RETURN 

< 137> 

2990 : POKE I,(PEEK(I)AND 127)OR Y 

<227> 

2500 REM 

<020> 

2995 NEXT:RETURN 

<140> 

2510 REM 

<030> 

3000 REM 

<012> 

2520 REM 

<040> 

3005 REM 

<017> 

2530 REM 

<050> 

3010 POKE PA,(PEEK(PA) AND 240) OR PW 

< 188> 

2550 PW=PW+P2:IF PW>=PM THEN PW=PW-PM 

<034> 

3015 L=LEN(STR*(PW)> 

<020> 

2555 SYS GT,PV 

<202> 

3020 SYS PR,5,31, BL*(3—L):F2*:PW:RETURN 

< 151 > 

2560 PW=PW+P1:IF PW>=PM THEN PW=PW-PM <044> 

3**» rem 

<062> 

2565 SYS GT,PV 

<214> 

3052 REM 

<064> 

2570 PW=PW-P1:IF PW< 0 THEN PW=PW+PM 

<040> 

3054 IF A<>134 THEN 3064 

<075> 

2575 SYS GT,PV 

<224> 

3056 REM 

<068> 

2580 PW=PW—P2:IF PW< 0 THEN PW=PW+PM 

<052> 

3058 QF=QF+1:IF OF<=50 THEN 3110 

<203> 

2585 SYS GT,PV 

<234> 

3062 0F=—49:GOTO 3076 

< 151 > 

2600 REM 

<122> 

3064 IF A<>135 THEN 3074 

< 102> 

2605 REM 

< 127> 

3066 REM 

<078> 

2610 SYS DO,PA,PW:L=LEN(STR*(PW)> 

<237> 

3068 OF=OF—1:IF 0F>=-49 THEN 3110 

<133> 

2620 SYS PR,3+LN,4,BL*(6-L>:F2*;PW 

<091 > 

3072 OF=50:GOTO 3084 

<052> 

2625 RETURN 

<143> 

3074 IF A< >133 THEN 3082 

<064> 

2630 REM 

< 152> 

3076 REM 

<090> 

2635 REM 

< 157> 

3078 T=T+1:IF T< = 11 THEN 3110 

< 171 > 

2640 POKE PA,PW:L=LEN(5TR*(PW)) 

<239> 

3080 T=0:GOTO 3090 

< 173> 

2650 SYS PR,3+LN,11,BL*(4-L>5F2*;PW 

< 124> 

3082 IF A< >136 THEN RETURN 

<111> 

2655 RETURN 

< 173> 

3084 REM 

<098> 

2660 REM 

<182> 

3086 T=T—1:IF T>=0 THEN 3110 

< 169> 

2665 REM 

< 187> 

3088 T=11 :GOTO 3096 

< 193> 

2670 POKE PA,PW:L=LEN(STR*(PW>> 

<013> 

3090 REM 

<104> 

2680 SYS PR,3+LN,16,BL*(4-L);F2*sPW 

<234> 

3092 0=0+1:IF 0<=5 THEN 3110 

< 120> 

2685 RETURN 

<203> 

3094 0=0:GOTO 3110 

< 152> 

2690 REM 

<212> 

3096 REM 

<110> 

2695 REM 

<217> 

3098 0=0-1:IF O>=0 THEN 3110 

<070> 

2700 IF A>136 OR A<133 THEN RETURN 

< 0B2 > 

3100 0=5:T=10 

< 159> 

2705 B=A-133 :REM B=0,l,2,3 

<253> 

3110 REM 

<124> 

2710 POKE PA,(PEEK(PA>AND 231)0R(B*8> 

< 159> 

3112 IF T=11 AND 0=5 THEN T=0:O=0 

< 129> 

2715 SYS PR,3+LN,2l,F2*;KV*(B) 

< 197> 

3114 BF=440*2T(0-4+(T-9)/12+0F/1200) 

< 144> 

2717 SYS PR,6 ,34,F2*;KF*(B>:RETURN 

<077> 

3116 0(SN)=0:T(SN)=T:OF(SN)=0F 

<012> 

2720 REM 

<242> 

3118 BF(SN)=BF*17.0327 

<087> 

2725 REM 

<247> 

3120 SYS D0,M0+7*SN,F*BF(SN) 

<028> 

2730 IF A>135 OR A<133 THEN RETURN 

<239> 

3122 REM 

< 136> 

2735 B=A-132 :REM B=l,2,3 

< 116> 

3124 SYS PR,3+SN,3,F2*;0 

<076> 

2740 POKE PA,(PEEK(PA)AND 249)OR(B*2 ) 

<065> 

3126 SYS PR,3+SN,2,TN*(T) 

<170> 

2745 SYS PR,3+LN,28,F2*;MD*(B) -.RETURN 

<034> 

3128 SYS PR,3+SN,5,RIGHT*(" "+STR*(OF),3) 

<225> 

2750 REM 

<016> 

3130 RETURN 

< 140> 

2755 REM 

<021> 

3150 REM 

< 164> 

2760 POKE PA,PW:L=LEN(STR*(PW)> 

< 103> 

3155 REM 

< 169> 

2765 SYS PR,7,S,BL*(4-L);F2*;PW:RETURN 

<007> 

3160 SYS DO,PA,PW 

<09B> 

2770 REM 

<036> 

3165 SYS PR,3+SN,9,F2*5RIGHT*("L2SPACE)"+S 


2775 REM 

<041> 

TR* (PW) ,4) 

< 114> 

27B0 B=-(A>134);REM F1,F3 B=0 F5,F7 B=1 

<027> 

3170 RETURN 

< 180> 

2785 POKE PA,(PEEK(PA)AND 247>0R(B*8) 

<046> 

3175 REM 

< 189> 

2790 SYS PR,7,29,F2*;CHR*(43+2*B) 

<238> 

3180 REM 

<194> 

2795 RETURN 

<057> 

3185 AD(SN)=(AD(SN)AND 15) OR PW*16 

<010> 

2810 REM 

<076> 

3190 POKE PA,AD(SN> 

<201 > 
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< 152> 
<210> 

4040 

<219> 

<224> 

4045 

<232> 
<231 > 

4050 

<230> 

<240> 

4055 

<249> 

<254> 

4100 

< 182> 

<144> 

4105 

< 156> 

4110 

<014> 

<023> 

4115 

<02B> 

<14B> 

4120 

< 174> 

4125 

<234> 

<044> 

4130 

<058> 

<063> 

4132 

< 180> 

4135 

<073> 

4200 

<076> 

4210 

<253> 

4220 

< 108 > 

4240 

<095> 

4245 

<001 > 

4250 

<019> 

4255 

< 140> 

4260 

< 115> 

4270 

<213> 

4280 

< 160> 

4290 

<031 > 

4292 

< 130> 

4294 

< 135> 

4300 

<217> 

4310 

<16B> 

< 146> 

4320 

<220> 

<255> 

4330 

<174> 

4340 

<070 > 

4350 

<025> 

<204> 

< 186> 

<004> 

4360 

<014> 

4370 

<024> 
<046> 
<151 > 

4380 

< 195> 

4390 

<061 > 

4400 

<254> 

441-0 

<099> 

4420 

<009> 

4430 

<081 > 

4500 

<097> 

4505 

< 106> 

4510 

< 116> 

< 126> 

4515 

<012> 

<00B> 

4520 

<241 > 

4525 

<242> 

<206> 

4530 

<216> 

<226> 

4535 

<049> 

<039> 

4540 

4545 

< 187> 
<050> 

4550 

<060> 

4555 

<070> 

4560 

<199> 

4565 

4570 

<252> 

4575 

<205> 

4580 

<223> 

4585 

< 118> 

4590 

<252> 

4595 

<006> 

4600 

<016> 

4602 

< 112> 

4604 


3195 SYS PR,3+SN,14,F2*;RIGHT*(STR*(PW>,2) 
3200 RETURN 
3205 REM 
3210 REM 

3215 AD(SN)=(AD(SN)AND 240) OR PW 
3220 POKE PA,AD(SN) 

3225 SYS PR,3+SN,17,F2*;RIGHT*(STR*(PW>,2) 
3230 RETURN 
3235 REM 
3240 REM 

3245 SR(SN)=(SR(SN)AND 15) OR PW*16 
3250 POKE PA,SR(SN) 

3255 SYS PR,3+SN,20,F2*;RIGHT*(STR*(PW>,2) 
3260 RETURN 
3265 REM 
3270 REM 

3275 SR(SN)=(SR(SN)AND 240) OR PW 
3280 POKE PA,SR(SN) 

3285 SYS PR,3+SN,23,F2*;RIGHT*(STR*(PW>,2) 
3290 RETURN 
3300 REM 
3305 REM 

3310 IF A<>133 AND A<>134 THEN 3335 
3315 REM 

3320 C(SN)=C(SN) OR 2t(7-S) 

3325 CI(SN)=C(SN) OR 1 

3330 SYS PR,3+SN,26+S,F2*;"1"3GOTO 3355 
3335 REM 

3340 C(SN)=C(SN) AND 255-2T(7-S) 

3345 CI(SN)=C(SN) OR 1 
3350 SYS PR , 3+SN , 26+S , F2*; " 0 11 
3355 REM 

3358 POKE 50334+SN,C(SN) 

3360 X=C(SN):IF SU THEN X=C1(SN) 

3365 POKE SI+7*SN+4,X:RETURN 
3370 REM 
3375 REM 

3380 POKE PA,PW:L=LEN(STR*(PW)) 

3385 SYS PR,3+SN,34,BL*(4-L);F2*;PW 
3390 RETURN 

3400 REM- 

3405 REM TEMPO 

3410 IF PW<40 THEN PW=40 

3415 IF PW>480 THEN PW=480 

3420 TE=PW:SYS DO,PA,INT(6E7/(24*TE)) 

3425 SYS PR,6,11, F2*;RIGHT*(STR*(PW),3) 

3430 RETURN 

3500 REM 

3510 REM 

3520 REM 

3525 SYS PR,15,10,F2*;“STIMME 1,2,3” 

3530 GET A*sIF A*=""THEN 3530 

3540 IF A*="1“OR A*="2"0R A*="3"THEN 3560 

3550 GOTO 3590 

3560 I=VAL(A*)-1 :S(I)=NOT S(I) 

3570 IF S(I> THEN PRINT CHR*(1B); 

3580 SYS PR,21,31+2*1,Fl*;A*;CHR*(146); 
3590 SYS PR,15,10,Fl*;"STIMME 1,2,3" 

3595 RETURN 

3600 REM 

3610 REM 

3620 REM 

3630 POKE 650,64 

3640 AD=MQ+72: X=PEEK(AD):POKE AD,X OR 1 
3650 IF PEEK (203>064 AND PEEK(198>=0 THEN 
3650 

3660 POKE AD,X AND 254:POKE 650,128:RETURN 

3700 REM 

3710 REM 

3720 REM 

3730 EG=NOT EG 

3740 IF EG THEN PRINT CHR*(18); 

3750 SYS PR,23,31,F1*;"SOFT—EG{RVOFF>“:RET 
URN 
3800 REM 
3B10 REM 
3820 REM 
3830 SU=NOT SU 

3840 POKE 50344,-SU:IF SU THEN PRINT CHR*( 
18) ; 

3850 SYS PR,22,31,F1*;"SUSTAIN{RVOFF>" 

3860 IF NDT SU THEN 2140 

3870 RETURN 

4000 REM 

4010 REM 

4020 REM 

4030 M=0:PV=0:SYS CL:PRINT “<HOME>";Fl* 


4040 PRINT" tccccccccccccccccccccccccccccc 

PRINT" ä-CRVSON,9SPACE>M O D U L A 
R {10SPACE,RVOFF >2" 

PRINT" 2{RVS0N,5SPACE>TH0MAS KRAE7 
{7SPACE>1985 {5SPACE,RVOFF> 2" 


STIMMEN-P 


ARAMETER" 


ER/LAUTSTAERKE" 


LKURVE (SOFT-EG)" 


KSV 


K" 


UENCER" 


' C3SPACE>D";F1*;" DIS 
1 <3SPACE>A";F1*;" SEQ 


1=1 TO 4 


<073> 

<004> 

< 110 > 

<069> 

< 100 > 

<074> 

<127> 

<059> 

< 1B2> 
<023> 

<254> 

<207> 

< 129> 
<198> 
<208> 
<218> 
<219> 

< 194> 

< 175> 
<245> 
<087> 
<044> 
<117> 
<221 > 
<003> 
<085> 
<093> 
<218> 


£2222222 2CSPACE,RVOFF>":NEXT <202> 


<118> 
<183> 
<001 > 


PRINT"<SPACE,RIGHT,SPACE,RIGHT,SPAC 
E,3RIGHT,SPACE,RIGHT,SPACE,RIGHT,SPAC 
E,3RIGHT,SPACE,RIGHT,SPACE,3RIGHT,SPA 
CE,RIGHT,SPACE,RIGHT,SPACE >":NEXT 
PRINT"{SPACE,RIGHT >2 <RIGHT >3 <3RIGHT >5 
{RI GHT >6 {RI GHT >7 {3RI GHT >9 {RI GHT > 0 <3R I 
GHT >—{RIGHT > S {RIGHT >C" 


< 011 > 


GOSUB 3570:NEXT I 


";F1* 

PRINT"{5SPACE >F{4SPACE >PW{3SPACE >A{2S 
PACE >D{2SPACE >S{2SPACE >R CONTROL PORT 
A" 


<093> 
<035> 
< 011 > 
<244> 
< 210 > 
<218> 
< 170> 
<244> 
<249> 
<254> 

<082 > 


<030> 


CQ-gCCCC g" 

FOR 1=1 TO 3 


< 135> 
<055> 


SPACE>2<2SPACE>2<2SPACE>2<7SPACE>2{4S 
PACE>2" <1B9> 

NEXT I <050> 

PRINT" ?j:j;^CAgPJ.Cjr££g££r££g££rR-m-R- 


•r1T££££5?" 


"9C.CNQISF" 


<038> 

<042> 

< 155> 

< 160 > 

< 190> 
<062> 
<043> 
< 212 > 
<228> 
<1B4> 

< 199> 
<089> 
<090> 
<213> 
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FQR SN=0 TD 2 

<13B> 

4918 

PA=M0+7*SN+4:PW=PEEK(PA):PM=256 

<210> 

460B 

: T=T(SN):0=0(SN):GF=OF(SN) 

<225> 

4920 

Pl=l:P2=10:PV=3370:RETURN 

<0 J6> 

4610 

: GOSUB 3122:REM F 

<234> 

5000 

REM 

<236> 

4612 

: PW=(USR(M0+7*SN+2>):GOSUB 3165 

<236> 

5005 

REM 

<241 > 

4614 

: PW=INT(AD <SN)/16) :GOSUB 3195 

<012> 

5010 

REM 

<246> 

4616 

: PW=AD(SN)AND 15 :GOSUB 3225 

<076> 

5015 

M=2:PV=0r SYS CL:PRINT"{HOME,RVOFF>";F 


4618 

: PW=INT<SR(SN)/16> :GOSUB 3255 

<093> 


1* 

< 177> 

4620 

: PW=SR(SN)AND 15 :GOSUB 3285 

<011> 

5020 

PRINT" FILTER/LAUTSTAERKE" 

<231 > 

4622 

: REM CONTROL-BYTE <7 BIT) 

<083> 

5025 

PRINT" t£££^y.c.cjj.cifccj.acacc^.cccc.ccc-g 


4624 

: B=C(SN):A=128 

<255> 


£S££S" 

<211 > 

4626 

: SYS PR,3+SN,26,F1*;"0000000" 

<010> 

5030 

PRINT“ £FILTF£ RES ^SCHALTERS MODUS £ 


4628 

: FOR S=7 TO 1 STEP -1 

< 145> 


LAUT2S“ 

<094> 

4630 

: IF(B AND A)THEN SYS PR,3+SN,33-S, 

“1 

5035 

PRINT" 'sscjlcil+cc.ccc+cccc ccc c+.cemcqc+ 



H 

<232> 


■C.C.C.C.P" 

<063> 

4632 

: A=A/2:NEXT S 

< 145> 

5040 

PRINT" £{5SPACEJ£{5SPACE>£ FILT1<2SPA 


4634 

: PA=M0+7*SN+4: PW=PEEK ( PA > 

<033> 


CE >£{3SPACE)LPC2SPACE >£{4SPACE >£" 

<143> 

4636 

: GOSUB 3370:REM PORTA 

<037> 

5045 

PRINT" Q'.C.CC.C.C.gC.C.CCC.P FILT2t2SPACE>£<3 


4638 

NEXT SN 

<202> 


SPACE>BP{2SPACEJgCCCCV" 

<050> 

4640 

F2*=A* 

<227> 

5050 

PRINT" £{11SPACE >£ FILT3<2SPACE)£<3SP 


4642 

SN=0:AV=4700:SYS GS,AV:RETURN 

< 132> 


ACEJHP{2SPACE>£" 

<053> 

4650 

REM 

< 140> 

5055 

PRINT" £{11SPACE>£ FILTEX £{2SPACE>30 


4652 

REM 

<142> 


FF £" 

< 1B7> 

4654 

REM 

< 144> 

5060 

PRINT" 7cccccccccccpcccccccnpnccccccv 


4656 

SN=SN-1:IF SN<0 THEN SN=2 

<000> 


n 

<008> 

4658 

GOSUB 5815:SYS GT,AV 

<004> 

5065 

PRINT F2*;" Fl";Fl*;"{4SPACEJ++<6SPAC 


4660 

REM 

<150> 


EJFILT1<6SPACE>LPC4SPACE>+" 

<015> 

4662 

SN=SN+1:IF SN>2 THEN 5N=0 

<182> 

5070 

PRINT F2*j" F3";F1*;"{4SPACEJ+{7SPACE 


4664 

GOSUB 5815:SYS GT,AV 

<010> 


>FILT2{6SPACE>BP<4SPACE}+" 

<083> 

4666 

REM 

<156> 

5075 

PRINT F2*;" F5";F1*;"{4SPACEJ-{7SPACE 


4668 

IF AVO4880 THEN 4674 

<142> 


>FILT3 <6SPACE JHP{4SPACE >-" 

<167> 

4670 

S=S+1:IF S>6 THEN AV=4910 

<090> 

5080 

PRINT F2* ; " F7";F1*;"{4SPACE>— C6SPAC 


4672 

GOTO 4678 

< 130> 


EJFILTEXC4SPACE 530FF<3SPACE >-“ 

<085> 

4674 

AV=AV+30:IF AV>4910 THEN AV=4700 

<040> 

5085 

PW= (PEEK (MO+21) AND 7) +8*PEEK (MO+22 ) 

<227> 

4676 

IF AV=48B0 THEN S=0 

< 133> 

5090 

SYS PR,5, 7-LEN(STR*(PW>),PW 

<033> 

4678 

GOSUB 5815:SYS GT,AV 

<024> 

5095 

PW=INT(RF/16) 

< 196> 

4680 

REM 

<170> 

5100 

SYS PR,5,12—LEN(STR*(PW)),PW 

<101> 

4682 

IF AVO4880 THEN 4688 

<223> 

5102 

IF RF AND 1 THEN SYS PR,5,15,"{RVSONJ 


4684 

S=S—1:IF S<0 THEN AV=4B50 

<110> 


FILT1{SPACE,RVOFF>" 

< 124> 

4686 

GOTO 4692 

<079> 

5104 

IF RF AND 2 THEN SYS PR,6,15,"{RVSONJ 


468B 

AV=AV—30:IF AV<4700 THEN AV=4910 

<054> 


FILT2{SPACE,RVOFF >" 

<079> 

4690 

IF AV=48B0 THEN S=6 

<0B3> 

5106 

IF RF AND 4 THEN SYS PR,7,15,”{RVSON> 


4692 

GOSUB 5815:SYS GT,AV 

<038> 


FILT3{SPACE,RVOFF >" 

<098> 

4700 

REM 

<190> 

51 Bt, 

IF RF AND 8 THEN SYS PR,8,15,"{RVSONJ 


4702 

REM 

< 192> 


TILTEX{RVOFF>“ 

<029> 

4704 

PB=FA+40*(SN+3)+2 

<125> 

5110 

PW=PEEK(MO+23) 

<225> 

4706 

FOR I=PB TO PB+5:POKE I,F2:NEXT 

< 183> 

5112 

IF PW AND 16 THEN SYS PR,5,25, " {RVSON 


4708 

T=T (SN) : 0=0(SN) : OF=OF(SN) 

<110> 


,SPACE >LP{SPACE,RVOFF >" 

<010> 

4710 

PA=M0+7«SN:PV=3050:RETURN 

<023> 

5114 

IF PW AND 32 THEN SYS PR,6,25, " {RVSON 


4730 

REM 

<220> 


,SPACEIBP{SPACE,RVOFF >" 

<010> 

4732 

REM 

<222> 

5116 

IF PW AND 64 THEN SYS PR,7,25, " {RVSON 


4734 

PB=FA+40*(SN+3)+9 

< 183> 


,SPACE JHP{SPACE,RVOFF > » 

<078> 

4736 

FOR I=PB TO PB+3:POKE I,F2:NEXT 

<197> 

5118 

IF PW AND 128 THEN SYS PR,8,25, " {RVSO 


4738 

PA=M0+7*SN+2 : PW=USR ( PA ) : PM=4096 

<093> 


NJ30FF{RVDFFJ“ 

< 193> 

4740 

P1 = 1 : P2=50 : PV=3150 : RETURN 

<094> 

5120 

PW=PEEK(MO+23)AND 15 

<200> 

4760 

REM 

<250> 

5122 

SYS PR , 5,34-LEN ( STR* ( PW ) ) , PW 

< 131 > 

4762 

REM 

<252> 

5125 

AV=5200:SYS GS,AV : RETURN 

<061 > 

4764 

PB=FA+40*(SN+3)+14 

<086> 

5130 

REM 

< 112> 

4766 

POKE PB,F2:POKE PB+1,F2 

<225> 

5135 

REM 

< 117> 

4768 

PA=S I +7*SN+5 : PW= I NT ( AD ( SN ) /1 6 > 

<041 > 

5140 

REM 

< 122> 

4770 

PM=16:Pl=l : P2=l : PV=3175:RETURN 

<246> 

5145 

AV=AV+50:IF AV>5400 THEN AV=5200 

<249> 

4790 

REM 

<024> 

5150 

GOTO 5165 

<059> 

4792 

REM 

<026> 

5155 

REM 

< 137> 

4794 

PB=FA+40* ( SN+3 > + 17 

< 140> 

5160 

AV=AV-50:IF AV<5200 THEN AV=5400 

<008> 

4796 

POKE PB,F2:POKE PB+1,F2 

<255> 

5165 

GOSUB 5815:A=PB-FA-200 

<057> 

4798 

PA=SI+7*SN+5:PW=AD(SN)AND 15 

<153> 

5170 

IF A<>15 AND A< >25 THEN SYS GT,AV 

< 132> 

4800 

PM=16:Pl=l : P2=l : PV=3205:RETURN 

<209> 

5175 

FOR J-l ro 3:PB=PB+40:GOSUB 5815:NEXT 

< 107> 

4820 

REM 

<054> 

5180 

PB=PB—120:SYS GT,AV 

<096> 

4822 

REM 

<056> 

5200 

REM 

<182> 

4824 

PB=FA+40*(SN+3)+20 

< 11B> 

5205 

REM 

< 187> 

4826 

POKE PB,F2:POKE PB+1,F2 

<029> 

5210 

PB=FA+203 

<203> 

4828 

PA=SI+7*SN+6:PW=INT(SR(SN)/16) 

< 104> 

5215 

FOR I=PB TO PB+3:POKE I,F2:NEXT 

< 16B> 

4830 

PM=16:P1=1:P2=1:PV=3235:RETURN 

< 112> 

5220 

PA=M0+21:PW=PEEK(PA)+8*PEEK(PA+1) 

<158> 

4850 

REM 

<084> 

5225 

PM=2048:PI=1:P2=50:PV=2850:RETURN 

<066> 

4852 

REM 

<086> 

5250 

REM 

<232> 

4854 

PB=FA+40*(SN+3)+23 

< 172> 

5255 

REM 

<237> 

4856 

POKE PB,F2:POKE PB+1,F2 

<059> 

5260 

PB=FA+210 

<243> 

4858 

PA=SI+7*SN+6:PW=SR(SN)AND 15 

< 173> 

5265 

POKE PB,F2:POKE PB+1.F2 

<216> 

4860 

PM=16:P1=1:P2=1:PV=3265:RETURN 

<016> 

5270 

PA=SI+23:PW=INT(RF/16) 

<056> 

4880 

REM 

< 116> 

5275 

PM=16:P1=1:P2=1:PV=2875:RETURN 

< 149> 

4882 

REM 

< 11B> 

5300 

REM 

<026> 

4884 

PB=FA+40*(SN+3)+26+S 

<248> 

5305 

REM 

<031 > 

48B6 

POKE PB,F2 

<111> 

5310 

PB=FA+215 

<057> 

4888 

PA=SI+7*SN+4:PV=3300:RETURN 

<248> 

5315 

FOR 1=0 TO 120 STEP 40:FOR J=0 TO 5 

<034> 

4910 

REM 

<146> 

5320 

: POKE PB+I+J,F2:NEXT:NEXT 

<248> 

4912 

REM 

<14B> 

5325 

PA=S I +23: PW=RF AND 15 

<229> 

4914 

PB=FA+40*(SN+3)+35 

<254> 




4916 

FOR 1=0 TO 2:POKE PB+I,F2:NEXT 

< 138> 
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5330 PV=2900:RETURN < 162> 

5350 REM <076> 

5355 REM <081> 

5360 PB=FA+225 <109> 

5365 FÜR 1=0 TO 120 STEP 40:FOR J=0 TO 3 <068> 

5370 : POKE PB+I+J,F2:NEXT:NEXT <042> 

5375 PA=M0+23 <006> 

5380 PV=2955:RETURN <093> 

5400 REM <128> 

5405 REM <133> 

5410 PB=FA+232 <151> 

5415 POKE PB,F2:POKE PB+1.F2 <112> 

5420 PA=M0+23:PW=PEEK(PA> AND 15 <218> 

5425 PM=16:P1=1:P2=1:PV=3010:RETURN <067> 

5500 REM <228> 

5505 REM <233> 

5510 REM <238> 

5515 M=3: SYS CL:PRINT"{HOME,RVOFFJ";Fl*; <049> 
5520 PRINT" {3SPACEJ t.cc.ccc cgc c c c-g c c c c - gc c c c c 

SSESSSSS“ <193> 

5525 PRINT"{3SPACEJa LFOF Ä-FOPS-FOASKURVE 

SMODUSa" <255> 

5530 PRINT" t.CjKCccccc+.cj.c.ctjj.ac.+.aacccq^ccc 

5535 FOR Z=3 TO 9 <247> 

5540 : SYS PR,Z,1,"2 2<6SPACE>S{4SPACE>S{4 

SPACE >5{6SPACE >S{5SPACE >a{4SPACE>a" <159> 
5545 NEXT Z <175> 

5550 SYS PR, 10,1 , "y.C. p.C.CC.C.CCT ’ .C.CCJF.CC.C.CFCCcc 

££F£££££F£££E5? <197 > 

5555 PRINT F2*;" Fl";Fl*;"(2SPACEJ++{5SPAC 
E J++{3SPACE J++{2SPACE>TRIAN{2SPACE>RE 
SET" <242> 

5560 PRINT F2*; 11 F3" ; Fl*; " {2SPACE>+<6SPACE 

J+{4SPACE> + {3SPACEJSAWUP(2SPACE JHOLD" <157 > 
5565 PRINT F2*;" F5”;Fl*;"(2SPACEJ-C6SPACE 

1—(4SPACE J—(3SPACE JSAWDWN RUN" <065> 

5570 PRINT F2*;" F7";Fl*;"<2SPACE>—{5SPAC 

E>—{3SPACEJ—{2SPACE >SQUARE" <125> 

5575 FOR LN=0 TO 6 <039> 

5580 s Z=3+LN <095> 

5585 : SYS PR,Z,2,CHR*(48+LN) <211> 

5590 : PW=USR(M0+32+5*LN) :REM LFOF <219> 

5595 : SYS PR,Z,10-LEN(STR*(PW)1,PW <037> 

5600 s PW=PEEK(M0+34+5*LN) :REM LFOP <210> 

5605 s SYS PR,Z,15—LEN(STR*(PW)),PW <067> 

5610 : PW=PEEK(M0+35+5*LN) :REM LFOA <221> 

5615 : SYS PR,Z,20-LEN(STR*(PW)),PW <059> 

5620 s PW=PEEK(M0+36+5*LN) sREM LFOC <249> 
5625 : SYS PR,Z,21,KV*((PW AND 24)/8) <203> 

5630 : SYS PR,Z,28,MD*((PW AND 6>/2> <172> 

5640 NEXT LN <132> 

5645 LN=0:AV=5830:SYS GS,AV:RETURN <151> 

5650 REM <124> 

5655 REM <129> 

5670 REM <144> 

5675 LN=LN—1:IF LN<0 THEN LN=6 <231> 

5680 GOSUB 5815:SYS GT,AV <010> 

5685 REM <159> 

5690 LN=LN+1:IF LN>6 THEN LN=0 <135> 

5695 GOSUB 5815:SYS GT,AV <025> 

5700 REM <174> 

5705 AV=AV+30:IF AV>5950 THEN AV=5B30 <070> 

5710 GOSUB 5810:SYS GT,AV <231> 

5715 REM <1B9> 

5720 AV=AV—30:IF AV<5830 THEN AV=5950 <085> 

5725 GOSUB 5810:SYS GT,AV <246> 

5800 REM <01B> 

5805 REM <023> 

5810 SYS PR,6,34,"(4SPACE >" <165> 

5815 FOR I=PB TO PB+6:P0KE I,F1:NEXT:RETUR 

N <142> 

5820 REM <038> 

5825 REM <043> 

5830 PB=FA+40*(LN+3)+4 <130> 

5835 FOR I=PB TO PB+5:P0KE I,F2:NEXT <040> 

5840 PA=M0+32+5*LN:PW=USR(PA):PM=65536 <23B> 

5845 P1=1:P2=200:PV=2610:RETURN <159> 

5850 REM <068> 

5855 REM <073> 

5860 PB=FA+40*(LN+3 > +11 <029> 

5865 FOR I=PB TO PB+3:P0KE I,F2:NEXT <054> 

5870 PA=M0+34+5*LN:PW=PEEK(PA):PM=256 <154> 

5875 P1=1:P2=10 :PV=2640:RETURN <202> 

5880 REM <098> 

5885 REM <103> 

5890 PB=FA+40*(LN+3)+16 <101> 


5895 FOR I=PB TO PB+3:P0KE I,F2:NEXT 
5900 PA=M0+35+5*LN:PW=PEEK(PA):PM=256 
5905 P1=1:P2=10 :PV=2670:RETURN 
5910 REM 
5915 REM 

5920 PB=FA+40*(LN+3)+21 

5925 FOR I=PB TO PB+5:POKE I,F2:NEXT 

5930 PA=MO+36+5*LN:PV=2700 

5935 B=(PEEK(PA) AND 24)/8:GOTO 2717 

5940 REM 

5945 REM 

5950 PB=FA+40*(LN+3)+28 

5955 FOR J=PB TO PB+4:P0KE J,F2:NEXT 

5960 PA=M0+36+5*LN 

5965 PV=2730:RETURN 

6000 REM 

6010 REM 

6020 REM 

6030 M=4:SYS CL:PRINT"{HOME,RVOFFJ";Fl* 
6040 PRINT" SOFTWARE-EG":PRINT:PRINT 
6050 PRINT" t.c.c.c.c. -B .C-C.qc. B -cc.cc B cCCCTCcccycccc 
CR.PC.C.CC-5" 

6060 PRINT" fi{2SPACE>A S{2SPACE>D £{2SPACE 
JS £{2SPACE>R a EGAS FORMaMODUSS" 

6070 PRINT" g .qC.C.C>.CACJ+.CC.C.C+J_CCC>CJJJ>.CC_CC. 

6080 


PRINT" a<4SPACE}a(4SPACE>a(4SPACE>a(4 
SPACE>a{4SPACE>a(5SPACE>a{5SPACE>a" 
6090 print" f.C-accrc-C-C-C. i rc cccfccccpccc crc c c c 

C FCCCCC? " 

6100 SYS PR,10,1,F2*;"Fl":PRINT" F3“ 

6110 PRINT" F5":PRINT" F7";F1* 

6120 SYS PR,10,13,"++{18SPACE>RESET" 

6130 SYS PR,11,13,"+{15SPACE>+<3SPACE>HOLD 

6140 SYS PR,12,13,"—{15SPACEJ—(3SPACEJRUN" 
6150 SYS PR, 13,13,”—° 

6160 FOR 1=0 TO 4 
6170 : PW=PEEK(M0+67+I) 

6180 : SYS PR,7,6+5*1—LEN(STR*(PW)),PW 
6190 NEXT I 
6210 PW=PEEK(MO+72) 

6220 CVS PR,7,29,CHR*(43+(PW AND 8)/4) 

6230 SVS PR,7,33,MD*((PW AND 6)/2) 

6240 AV=6310:AN=0:SYS GT,AV 
6300 REM 
6305 REM 

6310 PB=FA+2B2+5*AN:S=2+5*AN 
6315 FOR I=PB TO PB+3:P0KE I,F2:NEXT 
6320 PA=M0+67+AN :PW=PEEK(PA) 

6325 PM=256:IF AN=0 THEN PM=129 
6330 P1=1:P2=10:PV=2760:RETURN 
6335 REM 
6340 REM 

6345 PB=FA+280+27:POKE PB+2,F2 
6350 PA=MO+72:PV=2780:RETURN 
6370 REM 
6375 REM 

63B0 PB=FA+2B0+33 

6385 FOR I=PB TO PB+4:P0KE I,F2:NEXT 
6390 PA=M0+72:PV=2820:RETURN 
6395 REM 
6400 REM 
6405 REM 

6410 IF AVO6310 THEN 6420 
6415 AN=AN—1:IF AN>=0 THEN 6430 
6420 AV=AV—35:AN=4 
6425 IF AV<6310 THEN AV=6380 
6430 GOSUB 5B15:SYS GT,AV 
6435 REM 

6440 IF AVO6310 THEN 6450 
6445 AN=AN+1:IF AN<=4 THEN 6460 
6450 AV=AV+35 

6455 IF AV>6380 THEN AV=6310:AN=0 
6460 GOSUB 5815:SYS GT,AV 
6500 REM 
6510 REM 
6520 REM 

6530 M=5:PV=0:PRINT"{RVOFFJ";:SYS CL 
6540 SYS PR,1,1,F1*;"KREUZSCHIENEN—VERTEIL 
ER" 

6550 SYS PR,3,1,"E{4SPACEJLF0" 

6560 SYS PR,4,1,"G6543210" 

6570 SYS PR , 5,1 , F2* ; " GQÖPQyQ'y" 

6580 A*=F2*+“H"+F1*+"{BSPACEJ"+F2*+"I "+F1 
* 

6590 PRINT A*;"F1";F2*;“(5SPACEJCURS0RTAST 
EN" 


<0B6> 

<1B8> 

<246> 

< 130> 

< 135> 

< 155> 

< 132> 

< 112 > 

< 159> 
<160> 

< 165> 

< 181 > 
<226> 

< 149> 
<035> 
<220> 
<230> 
<240> 
<111> 
<223> 

< 136> 

< 119> 

<209> 

<132> 

<042> 

<044> 

< 183> 
<025> 

<227> 

< 164> 

< 159> 
<004> 
<055> 

< 153> 
<17S> 
<067> 

< 1B4> 
<124> 
<211> 
<010> 
<015> 

< 131 > 
<252> 
<251> 
<013> 

< 159> 
<045> 
<050> 
<034> 
<032> 
<080> 
<085> 
<087> 
<074> 
<195> 

< 105> 

< 112 > 

< 117> 
<245> 
<173> 

< 144> 
<054> 
<254> 

< 147> 
<212> 
<165> 
<245> 
<076> 
<028> 
<212> 
<222> 
<232> 

< 156> 

<038> 
<251 > 
<250> 
<087> 

<024> 

<052> 
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C64 


MUSIK 


66(913 

6610 

6620 

6630 

6640 

6650 

6660 

6670 

6680 

6685 

6690 

6700 

6710 

6720 

6730 

6740 

6750 

6760 

6770 

6780 

6790 

6800 

6810 

6820 

6830 

6840 

6850 

6860 

6870 

6880 

6890 

6900 

6910 

6915 

6920 

6925 

6930 

6935 

6940 

6950 

6960 

6965 

6970 

6975 

6980 

6990 

7000 

7005 

7010 

7015 

7020 

7025 

7030 

7035 

7040 

7045 

7050 

7055 

7060 

7065 

7070 

7075 


7080 

7085 

7090 

7095 

7100 

7110 

7115 

7120 

7122 

7125 

7130 

7135 

7140 

7142 

7144 

7146 


PRINT A*;"F2" 

PRINT A*;"F3" 

PRINT A*;"P1";F2*;"{5SPACEJF1 ";Fl*;" 
VERBINDUNG“ 

PRINT A*;"P2" 

PRINT A*;"P3";F2*;"£5SPACEJF7 ";F1*;“ 
KEINE VERBINDUNG" 

PRINT A*;"FILT" 

PRINT A*;"LAUT- 
PRINT F2*;" TTTTTHT" 

FOR Z=0 TO 7:GOSUB 6730sNEXT 

Z=0 sS=7:POKE 55296+40* (6+Z >+B-S,F2 

RETURN 

REM 

REM 

REM 

B=PEEK( M0+24+Z):A=128 

SYS PR,6+ Z,1,F1*;"{RVSON>00000000" 

IF B=0 THEN RETURN 
FOR S=7 TO 0 STEP -1 

IF (B AND A)THEN SYS PR,6+Z,8-S,"£RVSO 
N> 1" ; 

A=A/2:NEXT S 

PRINT Fl*;:RETURN 

REM 

REM 

REM 

POKE 55296+40*C6+Z)+8-S,Fl:REM AUS 

Z=(Z-1> AND 7:GOTO 6910:REM HOCH 

POKE 55296+40*(6+Z>+8-S,Fl 

Z=(Z+1> AND 7:GOTO 6910:REM RUNTER 

POKE 55296+40*(6+Z)+8-S,Fl 

S=(S+1> AND 7:GOTO 6910:REM LINKS 

POKE 55296+40*(6+Z>+8-S,Fl 

S=(S-1> AND 7:GOTO 6910:REM RECHTS 

POKE 55296+40*(6+Z)+8—S,F2:REM AN 

RETURN 

REM 

REM 

REM 

AD=M0+24+Z 

POKE AD,PEEK(AD) OR 2TS 
POKE 1024+40*(6+Z >+B-S,177:RETURN 
REM 
REM 
REM 

AD=M0+24+Z 

POKE AD,PEEK < AD) AND (255-2tS> 

POKE 1024+40*(6+Z > +8-S,176:RETURN 

REM 

REM 

REM 

M=6:P V=0:SYS CL:PRINT"{HOME,RVOFF>";F 

2* 

SYS PR,1,8,"A{11SPACE >B £11SPACE >C" 
PRINT F1 *s " £3SPACE> tC.C_C CCCCCCCJ.CC.CC.ee 
.c.c.c_c.c_cac_aaccci:ccc? " 

FOR 1=1 TO 8 

SYS PR,2+1,1,F2*;CHR*(48+1);Fl*" 2" 

SYS PR,2+1,38,"2":NEXT 

sys PR. 1 1 .5." 7.acj.ac.aac_c.cccc_c_ccc_c_ccc_cc 

SYS PR,12,4,F2*;"A—C 1-8" 

SYS PR,12,13,Fl»;"SOUND WAEHLEN" 

SYS PR,13,1,F2*;"+£2SPACE>A—C 1-8" 

SYS PR, 13, 13,Fl*"SOUND ABSPEICHERN" 
SYS PR,14,1,F2*;"N" 

SYS PR,14,13,Fl*;"NAMEN EINGEBEN (RET 
URN) " 

FOR S=0 TO 2:FOR Z=0 TO 7 
: SYS PR,3+Z,4+S*12,; 

: SYS NA,SO+107*(8*S+Z> +97 

NEXT:NEXT:IF NS<0 THEN Z=0:S=0:RETURN 

Z=NS AND 7:S=INT(NS/8):GOTO 7180 

REM 

REM 

X=A—65 :REM SPALTE 0,1,2 

SYS PR,12,13,F2*;"£RVOFF>SOUND WAEHLE 

N" 

GET A*:IF A*="“ THEN 7125 
Y=ASC(A*> —49:REM ZEILE 
IF Y<0 OR Y>7 THEN 7142 
GOSUB 7150:GOSUB 7400 

SYS PR,12,13,Fl*;"{RVOFFJSOUND WAEHLE 
N” 

RETURN 


<052> 
<063> 

< 191 > 
<087> 

<216> 
<031 > 
<076> 
<126> 
<007> 
<239> 

< 144> 
<158> 
<168> 

< 178> 
<015> 
<227> 
<051 > 
<082> 

< 198> 
<228> 
<09B> 
<002> 
< 012 > 
<022> 
<02B> 
<06B> 
<243> 
<033> 
<007> 
<185> 
<027> 

< 176> 

< 12B> 

< 115 > 
<124> 
<129> 
<134> 

< 134> 
<005> 
<096> 

< 164> 

< 169> 

< 174> 

< 174> 
<253> 
<00B> 
<204> 
<209> 
<214> 


<017> 

<224> 

<130> 

< 146> 
<105> 

< 113> 

< 202 > 

<0B9> 

< 163> 
<209> 
<056> 

< 104> 

< 199> 

< 144> 

< 174> 
<057> 
<076> 

< 141 > 
<058> 
<063> 
<24B> 

<249> 

<194> 

< 184> 

< 193> 
<058> 

<237> 

<088> 


7150 

7155 

7160 

7165 

7170 

7175 

71B0 

7185 

7190 

7200 

7205 

7210 

7215 

7220 

7225 

7230 

7235 

7240 

7245 

7250 

7255 

7260 

7300 

7305 

7310 

7315 

7320 

7325 

7330 

7335 

7340 

7345 

7350 

7355 

7360 

7365 

7370 

11 - 73 /. 

7380 

7385 

7390 

7395 

7400 

7402 

7404 

7406 

7408 

7410 

7412 

7414 

7416 

7418 

7420 

7422 

7424 

7426 

742B 

7429 

7430 
7432 
7434 
7436 
7438 
7440 
7442 
7444 
7450 
7452 
7454 
7456 
7458 
7460 
7462 
7464 
7466 
7468 
7470 
7472 


REM 

NS=8*S+Z 

: SYS PR,3+Z,4+S*12,Fl*;"{RVOFF>"; 

: SYS NA,SO+107*NS+97 
REM 

S=X:Z=Y:NS=B*S+Z 

: SYS PR,3+Z,4+S*12,F2*;"{RVOFF>"; 

: SYS NA,SO+107*NS+97 

RETURN 

REM 

REM 

SYS PR,13,13,F2*;"{RVOFFJSOUND ABSPEI 
CHERN" 

GET A*:IF A*="" THEN 7215 

X=ASC (A*> -65: REM SPALTE 

IF X<0 OR X>2 THEN 7250 

GET A*:IF A*="" THEN 7230 

Y=ASC(A*)—49:REM ZEILE 

IF Y<0 OR Y>7 THEN 7250 

GOSUB 7150:GOSUB 7450:GOTO 7260 

SYS PR,13,13,Fl*;"{RVOFFJSOUND ABSPEI 

CHERN" 

RETURN 

SYS PR,13,13,Fl*;"{RVOFFJSOUND ABSPEI 
CHERN" 

REM 

REM 

SYS PR,14,13,F2*;“NAMEN EINGEBEN (RET 
URN) “ 

X=12*S+4:Y=Z+3:AD=1024+40*Y+X 

SA=SO+107 *NS+97:1=0 

POKE AD+I,PEEK(AD+I) OR 128 

GET A*:IF A*="" THEN 7330 

A=ASC(A*):IF A<32 OR A>95 THEN 7370 

REM 

SYS PR,Y,X+I,F2*;A*;:POKE SA+I,A 
1 = 1 + 1 

IF I>9 THEN 1=9:GOTO 7325 
IF I<0 THEN 1=0 
GOTO 7325 

IF A=29 THEN POKE AD+I,PEEK(AD+I) AND 
127:GOTO 7350 

IF A=157 THEN POKE AD+I,PEEK(AD+I) AN 

D 127:1=1-1:GOTO 7355 

IF A< >13 THEN 7330 

POKE AD+I,PEEK(AD+I) AND 127 

SYS PR,14,13,Fl*;"NAMEN EINGEBEN (RET 

URN) " 

RETURN 

REM 

REM 

SA=SD+NS* 107: SYS GE,SA 
FOR 1=0 TO 2 
: AD=SA+7*I 
: BF(I)=USR(AD+73) 

: X=BF(I>/17.0327/440 
: Y=LQG(X)/LOG(2) :REM X=2tY 
: Y=Y+4+9/12+49/1200 
: 0(1)=INT(Y):Y=(Y—O(I))*12 
: T(I)=INT(Y) 

: OF(I)=INT((Y-T(I>>*100-48.5) 

: S(I)=(PEEK(AD+75)=1) 

: A*=CHR*(49+1):GOSUB 3570 
: C(I)=PEEK(AD+77) AND 254 
: POKE 50334+I,C(I> 

: C1(I)=C(I) OR 1 
: AD ( I > =PEEK ( AD+78) 

: SR(I> =PEEK(AD+79) 

NEXT I 

RF=PEEK(SA+94) 

EG=(PEEK(SA+95)=1):GOSUB 3740 

SU=(PEEK(SA+96)=1):GOSUB 3840 

RETURN 

REM 

REM 

SA=SO+NS*107:SYS PU,SA 
FOR SN=0 TO 2 
: AD=SA+7*SN 
: SYS DO,AD+73,BF(SN) 

: POKE AD+75,-S(SN) 

: POKE AD+77,C(SN) 

: POKE AD+78,AD(SN) 

: POKE AD+79,SR(SN) 

NEXT SN 
POKE SA+94,RF 


REM 


<094> 


Listing 2. Der »Sound-Editor« (Fortsetzung) 


<098> 

<096> 

< 193> 
<244> 
< 120 > 
<224> 
<223> 
< 010 > 

< 136> 
<059> 

< 155> 

<078> 
<221 > 
<026> 
<059> 
<232> 
<035> 
< 220 > 

< 111 > 

<0B6> 
<201 > 

<096> 

<250> 

<255> 

< 212 > 

< 195> 

< 178> 
<097> 

< 140> 
<206> 
<034> 
<242> 
<221 > 
<145> 
<080> 
<162> 

<064> 

<099> 

<023> 

<024> 

<004> 

<085> 

<094> 

<096> 

<092> 

<233> 

<060> 

< 102 > 
<229> 
<077> 
<211 > 
<063> 

< 191 > 
<077> 
<252> 

< 157> 
<064> 
<207> 
<0B6> 
<239> 
<226> 
<154> 

< 166> 
<002> 
<204> 

< 136> 

< 146> 

< 148> 

< 185> 
<082> 

< 164> 
<098> 
<205> 
<012> 

< 179> 
<110> 
<240> 
<028> 
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C64 


7474 

POKE SA+95,—EB 


< 135> 

8060 

FOR 1=0 TO 129:READ X:POKE B51+I,X:NE 


7476 

POKE SA+96.-SU 


<17B> 


XT 

< 184> 

747B 

RETURN 


<170> 

8065 

POKE 785,169:POKE 786,3:REM USR 

<025> 

7500 

REM 


<196> 

8070 

REM 

<002> 

7505 

REM 


<201 > 

8072 

REM 

<004> 

7510 

REM 


<206> 

8074 

FOR 1=50211 TO 50291 

<011> 

7515 

M=7:PV=0:SYS CL:POKE 157,0 


<055> 

8076 

READ X:POKE I,X:NEXT 

< 125> 

7520 

PRINT Fl*;"CHQME,DOWN,SPACE>D I SK " 


<094> 

8078 

REM 

<010> 

7525 

SYS PR,5,4,F2*;"Fl" 


< 167> 

8080 

REM 

<012> 

7530 

SYS PR,5,7,Fl*;"SOUNDS LADEN" 


< 165> 

8082 

FOR 1=0 TO 11:READ TN*<I):NEXT 

<052> 

7532 

SYS PR,6,4,F2*;"F2" 


<239> 

8100 

REM 

<032> 

7534 

SYS PR,6,7,Fl*;"SONG«SPACE >LADEN" 


< 156> 

8110 

REM 

<042> 

7535 

SYS PR,7,4,F2*;"F3" 


<051 > 

8120 

READ A*:L=LEN(A*) 

<222> 

7540 

SYS PR,7,7,Fl*;"SOUNDS ABSPEICHERN' 


<078> 

8130 

ON L GOTO 8150,8220,8280,8310,8310 

< 122> 

7545 

RETURN 


<237> 

8150 

REM 

<0B2> 

7600 

REM 


<040> 

8160 

A=ASC <A*> 

< 1B0> 

7605 

REM 


<045> 

8170 

IF M>=0 THEN VX <M,A> =ZN:GOTO 8120 

< 190> 

7610 

SYS PR,5,7,F2*;"SOUNDS LADEN" 


<253> 

8180 

FOR 1=0 TO 8:VX <I,A)=ZN:NEXT 

<072> 

7615 

SYS PR,10,4,Fl*;"DATEINAME "; 


<248> 

8190 

GOTO 8120 

< 136> 

7620 

DN*="SOUNDS{14SPACE >" 


<023> 

8200 

IF LEFT* <A*,1)< >"M" THEN 8120 

< 151 > 

7625 

SYS PR,10,16,DN* 


<234> 

8220 

REM 

<059> 

7630 

SYS PR,10,14,;:INPUT DN* 


<22B> 

B230 

IF LEFT* <A*,1)< >"M" THEN 8120 

< 181 > 

7632 

SYS 50198:GOSUB 2140:REM MOD. AUS 


<003> 

B240 

A*=RIGHT* <A*,1) 

<012> 

7635 

OPEN 8,8,8,DN*+",P,R":CLOSE 8 


< 165> 

8250 

IF A*="A" THEN M=-l :GOTO 8120 

<220> 

7640 

OPEN 1,8,15:INPUT#1,A,A*,X,Y:CLOSE 

1 

<056> 

8260 

M=VAL < A* > : GOTO B120 

<252> 

7645 

SYS PR,12,4,"T29SPACE >" 


< 153> 

8280 

REM 

< 119> 

7650 

IF A=0 THEN 7660 


< 107> 

B290 

A=VAL <A*) :GOTO 8170 

<082> 

7655 

SYS PR,12,3,A;A*;X;Y:GOTO 7625 


<086> 

8310 

REM 

< 149> 

7660 

A=0:LOAD DN*,8,1 


<255> 

8320 

IF A*="ENDE" THEN 8340 

<069> 

7665 

SYS PR,5,7,Fl*;"SOUNDS LADEN" 


<044> 

8330 

ZN=VAL<A*) :GOTO 8120 

< 184> 

7670 

NS=—1 : A=211 


<022> 

8340 

REM 

<179> 

7675 

SYS DO,56326,INT(6E7/(24*TE)) 


<222> 

8350 

REM 

< 189> 

76B0 

IF SR THEN SYS 51093:GOTO 1550 


<187> 

8360 

A*="02W3ER5T6Y7U19O0P&-* £ t <HOME >;=" 

<074> 

7685 

SYS MO+1033: GOTO 1550 


<189> 

8370 

FOR 1=0 TO 24 

<172> 

7700 

REM 


< 142> 

8380 

: A=ASC <MID*(A*,1 + 1,1)) 

< 114> 

7705 

REM 


< 147> 

8390 

: TNX <A)=1 

< 124> 

7710 

SYS PR,7,7,F2*;"SOUNDS ABSPEICHERN' 


<002> 

8400 

: FOR J=0 TO 8:VX <J,A)=2000:NEXT 

<027> 

7715 

SYS PR,10,4,FIS;"DATEINAME “; 


<094> 

8410 

NEXT I 

<004> 

7720 

DN*="SOUNDS < 14SPACE>" 


< 125> 

8450 

REM 

<130> 

7725 

SYS PR,10,16,DN* 


<080> 

8455 

REM 

<135> 

7730 

SYS PR,10,14,;:INPUT DNS 


<074> 

8460 

FOR 1=0 TO 24:TH<I > =2T <1/12):NEXT 

< 114> 

7735 

SYS 50198:GOSUB 2140:REM MOD/SEQ AUS 

<174> 

8465 

REM 

< 145> 

7740 

REM 


<182> 

8470 

Kc. 1 

<150> 

7745 

OPEN 1,B,1,"@:"+DNS 


<005> 

8472 

GS=B28:GT=857:PR=869:D0=897:CL=959 

<051 > 

7750 

POKE 252,0:POKE 253,144:REM *9000 


<233> 

8474 

NA=50229:GE=50245:PU=50276 

<191 > 

7755 

POKE 780,252:REM AKKU 


<065> 

8480 

SI=54272:M0=49152:FA=55296 

<237> 

7760 

POKE 781,8 :REM X-REG = *08 


<054> 

8482 

S0=36864:CI=56320 

< 174> 

7765 

POKE 782,154:REM Y-REG = *9A 


< 179> 

8484 

F1*=CHR*(154) : Fl=14 

<002> 

7770 

SYS 65496 : REM KERNAL SAVE 


<111> 

8490 

F2*=CHR*<5) : F2=l 

<025> 

7775 

CLOSE 1 


< 166> 

8495 

KV* <0)="TRIAN ":KF*<0)="WMNn" 

<049> 

77B0 

OPEN 1,8,15:INPUT#1,A,AS,X,Y:CLOSE 

1 

< 198> 

8500 

KV* < 1 )=" SAWUP ":KF*<1)="KLNL" 

<21B> 

77B5 

IF A=0 THEN 7795 


<015> ■ 

8505 

KV* < 2 )=" SAWDWN ": KF* < 2 )=" enen" 

< 157> 

7790 

SYS PR,12,4,A;AS;X;Y:GOTO 7725 


<033> 

B510 

KV* < 3) = 1 " SQUARE " : KF* < 3) = " .O.L.O.L" 

<21B> 

7795 

SYS PR,12,4,"«0SPACE >" 


<049> 

8515 

MD* < 0)="RESET" :MD* <1) = "RESET" 

<091 > 

7800 

SYS PR,7,7,Fl*;"SOUNDS ABSPEICHERN' 


<084> 

8520 

MD* < 2)="HOLD " :MD* < 3)="RUN «SPACE >" 

<203> 

7B05 

SYS DO,56326,INT(6E7/<24*TE>) 


<098> 

8525 

BL* <0)="":BL* <1)=" ":BL* <2)="«SPACE > 


7B10 

IF SR THEN SYS 51093:RETURN 


<098> 


" 

<243> 

7B15 

SYS 50185:RETURN:REM NUR MOD. AN 


<183> 

8530 

BL* < 3) = " «SPACE > " : BL* < 4) ='' C4SPACE > " 

<066> 

7900 

REM- 


< 146> 

8535 

BL* < 5) = " <5SPACE > " : BL* < 6) ='' <6SPACE > " 

<202> 

7905 

REM SONG LADEN 


<249> 

8540 

REM 

<220> 

7910 

SYS PR,6,7,F2*;"SONG «SPACE >LADEN" 


<030> 

B545 

REM 

<225> 

7915 

SYS PR,10,4,Fl*;"DATEINAME 


<038> 

8550 

FOR SN=0 TO 2 

<018> 

7920 

SYS PR,10,14,;:INPUT DN* 


<008> 

8555 

: POKE SI+7*SN+5,10 :AD(SN)=10 

<080> 

7925 

SYS 50966:GOSUB 2140 


<021 > 

8560 

: POKE SI+7*SN+6,138:SR<SN)=138 

<229> 

7930 

OPEN 8,B,8,DN*+",P,R":CLOSE B 


<206> 

8565 

: 0 <SN>=3+SN:OF <SN)=0:T <SN)=0 

<099> 

7935 

OPEN 1,8,15:INPUT41,A,A*,X,Y:CLOSE 

1 

<097> 

8570 

: BF=440*2 T < 0 < SN)-4+ < T < SN)-9)/12+OF < S 


7940 

SYS PR,12,4,"C29SPACE>" 


< 196> 


Nl/1200) 

< 118> 

7945 

IF A=0 THEN 7955 


< 171 > 

8572 

: BF <SN)=BF*17.0327 

<208> 

7950 

SYS PR,12,3,A;A*;X;Y:GOTO 7920 


<061 > 

8575 

: C <SN)=64 :CI<SN)=65 

<016> 

7955 

A=0:M=7.5:LOAD DN*,8,1 


<084> 

8578 

: POKE 50334+SN,C < SN) 

<235> 

7960 

SYS PR,6,7,Fl*;"SONG«SPACE>LADEN“ 


<074> 

85B0 

: S <SN) = <SN=0) 

< 151 > 

7965 

M=7:SQ=—1 


<040> 

85B5 

: SYS DO,MO+7*SN+2,2048 :REM PW 

<072> 

7970 

SYS DO,56326,INT<6E7/<24*TE)) 


<009> 

8590 

: POKE MO+7*BN+4,0 :REM PORTA 

< 17B> 

7975 

SYS DD,50310.USR<39432) 


<040> 

8595 

NEXT SN 

<093> 

7980 

SYS 51001 :REM SEQ/MOD START/INIT 


< 162> 

8600 

POKE SI+23,0:RF=0 :REM RES/FILT 

<049> 

79B5 

IF NOT SR THEN SYS 50966 


<038> 

8605 

SYS D0.M0+21,0 :REM FILTERFR. 

<101> 

7990 

A=65:GOTO 1550 


<0B9> 

8610 

POKE MO+23,15 :REM MOD/LAUT 

<15B> 

8000 

REM 


< 188> 

8615 

FOR 1=24 TO 72 : REM KSV,LFO,EG AUS 

<208> 

8010 

REM 


< 198> 

8620 

: POKE MO+1,0:NEXT 

< 037 > 

8020 

REM 


<208> 

8625 

EG=0 : REM EG ABKOPPELN 

< 161 > 

8030 

PRINT"CCLR,12D0WN,7SPACE >"; 


< 121 > 

8627 

POKE 50303,0 :REM EG ABKOPPELN<SEQ) 

<066> 

8035 

PRINT"BITTE 30 SEKUNDEN WARTEN" 


<074> 

8630 

SU=0 :REM SUSTAIN AUS 

<204> 

8040 

REM 


<228> 

8632 

TE=120 :REM TEMPO 

<239 > 

8045 

REM 


<233> 

8635 

REM 

<059> 

8050 

FOR 1=0 TD 22 :REM KERNAL—GOSUB 


<046> 

8640 

REM 

<064> 

8055 

POKE 828+1,PEEK<43139+1):NEXT 


<216> 

8645 

FOR NS=0 TO 23 

<000> 
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8650 

: GÜSUB 7450 

<190> 


CE>2(5SPACE>2 1<2SPACE>2<2SPACE>3 2" 

<069> 

8655 

: AD=SO+107*NS+97 

<000> 

10080 

SYS PR,7■4-" 9gCgCTO.CCg.Cy.ee cc eye C C C Cf 


8660 

: FOR I=AD TO AD+9:POKE I,46:NEXT 

< 186> 


CCCCCCCCCV" 

< 199> 

8665 

NEXT 

NS:NS=0 

<097> 

10090 

SYS PR,9,1,F2*;"Fl“;F1*;"<2SPACE>RES 


8700 

REM 


<124> 


ET <2SPACE >++ <18SPACE >1" 

<211 > 

8870 

REM 


<040> 

10100 

SYS PR,10,1,F2*;"F3";F1*;"<2SPACE >ST 


88B0 

POKE 

53280,14:POKE 53281,6 

<200> 


OP (4SPACE> + C2SPACE >SONG <4SPACE >+ <7SP 


8890 

PRINT Fl*;"<RVOFF>";:POKE 650,128 

<090> 


ACEJ2" 

< 178> 

8900 

GOSUB 4200 : REM BILD ZEILEN 15-23 

<004> 

10110 

SYS PR,11,1,F2*;"F5";Fl*;"<2SPACE>RU 


8910 

SYS MO+1033:REM MODULATOR AKTIV 

<239> 


N (5SPACE >-{2SPACE >SEQ <5SPACE >-(7SPAC 


8920 

SQ=0:SM-0:SR=0:A=2:RETURN 

<10B> 


E>3" 

< 106> 

9000 

REM 


< 172> 

10120 

SYS PR , 12,1 , F2* ; " F7 " ; F1 * ; " <9SPACE >— 


9010 

REM 


< 1B2> 


.1 

<093> 

9020 

REM 


< 192> 

10130 

IF SR THEN 10150 

< 128> 

9030 

REM 


<202> 

10140 

SYS PR,6,5,"STOP":GOTO 10160 

< 172> 

9060 

DATA 

032,089,003,076,174,167,032 

<002> 

10150 

SYS PR,6,5,"RUN “ 

<13B> 

9070 

DATA 

253,174,032,13B, 173,032,247 

<116> 

10160 

SYS PR,6,11,RIGHT*(STR*(TE>,3) 

< 152> 

9080 

DATA 

183,076,163,168,032,253,174 

<234> 

10170 

IF SM THEN 10190 

<095> 

9090 

DATA 

032,158,183,138,072,032,253 

<030> 

10180 

SYS PR, 6, 16, "SONG" : GOTO 10210 

<255> 

9100 

DATA 

174,032,158,183,138,168,104 

<110> 

10190 

SYS PR,6,16,"SEQ " 

<005> 

9110 

DATA 

170,024,032,240,255,032,253 

<249> 

10200 

SYS PR,6,22,RIGHT*<" "+STR*(SE),3) 

< 168> 

9120 

DATA 

174,076,160,170,032,253,174 

< 179> 

10210 

REM 

<110> 

9130 

DATA 

032,138,173,032,247,183,165 

<247> 

10220 

X=PEEK(50303) 

<110> 

9140 

DATA 

020,133,158,165,021,133,159 

<045> 

10230 

IF X AND 1 THEN SYS PR,6,28,"{RVSON, 


9150 

DATA 

032,253,174,032,138,173,032 

<020> 


SPACE>1 " 

<040> 

9160 

DATA 

247,183,160,000,120,165,020 

< 107> 

10240 

IF X AND 2 THEN SYS PR,6,31,”<RVSON, 


9170 

DATA 

145,158,200,165,021,145,158 

< 187> 


SPACE>2 " 

< 1B2> 

9180 

DATA 

088,096,032,247,183,160,000 

<008> 

10250 

IF X AND 4 THEN SYS PR,6,34 "CRVSON, 


9190 

DATA 

120,177,020,133,099,200,177 

<251 > 


SPACE>3 " 

<197> 

9200 

DATA 

020,088,133,098,162,144,056 

< 194> 

10300 

AV=10500:SYS GS,AV:RETURN 

<051 > 

9210 

DATA 

076,073,188,169,032,162,000 

<247> 

10400 

REM- 

<016> 

9220 

DATA 

157,000,004 ,157,000,005,202 

<0B0> 

10410 

REM PARAMETERWAHL DURCH CURSOR 

< 108> 

9230 

DATA 

208,247,162,087,157,000,006 

< 143> 

10420 

REM RECHTS 

<031 > 

9240 

DATA 

202,016,250,096 

<106> 

10430 

AV=AV+100:IF AV>10900 THEN AV=10500 

<095> 

9250 

REM 


< 16B> 

10440 

GOTO 10470 

<053> 

9260 

REM 


< 17B> 

10450 

REM LINKS 

< 154> 

9270 

DATA 

032,253,174,032,138,173,032 

< 142> 

10460 

AV=AV—100:IF AV<10500 THEN AV=10900 

<014> 

9280 

DATA 

247,183,165,020,133,158,165 

<228> 

10470 

FOR I=PB TO PB+8:POKE I,F1:NEXT 

<125> 

9290 

DATA 

021,133,159,096,032,035,196 

<029> 

10480 

SYS GT,AV 

<057> 

9300 

DATA 

160,000,177,158,032,210,255 

< 194> 

10500 

REM- 

< 118> 

9310 

DATA 

200,192,010,208,246,096,032 

<08B> 

10510 

REM RUN/STOP WAEHLEN 

< 132> 

9320 

DATA 

035,196,160,000,177,158,153 

< 129> 

10520 

PB=FA+245 

< 195> 

9330 

DATA 

000,192,200,192,073,208,246 

<052> 

10aj7 

FOR I=PB TO PB+3:POKE I,F2:NEXT 

<149> 

9340 

DATA 

177,158,153,183,211,200,192 

< i 11 > 

10540 

PA=CI+12:PV=11000:RETURN 

< 170> 

9350 

DATA 

094,208,246,177,158,141,023 

<0B2> 

10600 

REM- 

<218> 

9360 

DATA 

212,096,032,035,196,160,000 

<007> 

10610 

REM TEMPO WAEHLEN 

<139> 

9370 

DATA 

185,000,192,145,158,200,192 

<001 > 

10620 

PB=FA+250 

<021 > 

9380 

DATA 

073,20B, 246,096 

<042> 

10630 

FOR I=PB TO PB+3:POKE I,F2:NEXT 

<249> 

9400 

REM 


<062> 

10640 

PA=CI+6:PW=TE 

<018> 

9410 

REM 


<072> 

10650 

PM=500: P1 = 1: P2= 10 : PV=3400: RETURN 

<012> 

9420 

DATA 

C,C#,D,D#,E,F,F#,G,G#,A,A#,H 

<211 > 

10700 

REM-- 

<062> 

9500 

REM 


< 164> 

10710 

REM MODUS WAEHLEN 

< 121 > 

9510 

REM 


<174> 

10720 

PB=FA+256 

< 145> 

9520 

DATA 

MA,4000,X,3500,V,3600,032 

< 135> 

10730 

FOR I=PB TO PB+3:POKE I,F2:NEXT 

<093> 

9530 

DATA 

MA,3700,160,3800,S,9990,A 

< 130> 

10740 

PA=50345:PW=PEEK(PA) 

<020> 

9540 

DATA 

MA,2550,133,2560,134 

< 152> 

10750 

PV=11100:RETURN 

<100> 

9550 

DATA 

MA,2570,135,25B0,136,4500,214 

<203> 

10800 

REM- 

< 164> 

9555 

DATA 

MA, 5500, L, 6000, H, 6500, K 

<220> 

10810 

REM SEQNR WAEHLEN 

<207> 

9560 

DATA 

MA,5000,F,7000,211,7500,D 

< 144> 

10820 

PB=FA+262 

<233> 

9565 

DATA 

Ml,4654,145,4660,017 

< 124> 

10830 

FOR I=PB TO PB+2:POKE I,F2:NEXT 

< 1B7> 

9570 

DATA 

M1,4666,029,4680,157 

< 115> 

10840 

PW=SE:P1=1:P2=1:PM=1000 

<054> 

9580 

DATA 

M2,5160,157,5145,029 

<205> 

10850 

PV=11200:RETURN 

<075> 

9600 

DATA 

M3,5675,145,5690,017 

<137> 

10900 

REM- 

<008> 

9610 

DATA 

M3,5720 , 157,5705,029 

<248> 

10910 

REM SOFT-EG WAEHLEN 

<203> 

9620 

DATA 

M4,6410,157,6440,029 

<066> 

10920 

PB=FA+26B 

<101> 

9630 

DATA 

M5,6830,145,6850,017 

< 117> 

10930 

FOR I=PB TO PB+8:POKE I,F2:NEXT 

<079> 

9640 

DATA 

M5,6870,157,6B90,029 

<124> 

10940 

PA=50303:PV=11300:RETURN 

< 124> 

9650 

DATA 

M5.6935,133,134,6975,135,136 

<049> 

11000 

REM- 

< 10B> 

9700 

DATA 

M6,7110, A,B, 0,7200,»-,7300, N 

< 181 > 

11010 

REM SEQUENCER RESET/STOP/RUN 

<231 > 

9750 

DATA 

M7,7600,133,7700,134,7900,137 

<079> 

11015 

IF NOT SQ THEN RETURN 

<095> 

9B00 

DATA 

MB,10420,029,10450,157 

< 141 > 

11020 

IF A<133 OR A>135 THEN RETURN 

<234> 

9900 

DATA 

ENDE 

<237> 

11030 

ON A—132 GOTO 11040,11060,11080 

< 107> 

9990 

REM 


< 146> 

11040 

REM RESET 

< 175> 

10000 REM= 

mmmmmmmBmm mmmmmmm 

<026> 

11042 

IF SM THEN SYS 51116:RETURN 

< 197> 

10010 REM 

UNTERMENUE SEQUENCER 

< 121 > 

11045 

SYS 51001 

<091 > 

10020 REM============================== 

<046> 

11050 

IF NOT SR THEN SYS 50966 

<055> 

10030 M=8:PV=0:SYS CLrPRINT"<HOME,DOWN>“ 


11055 

RETURN 

< 191 > 


i*; 


<005> 

11060 

REM STOP 

<164> 

10040 PRINT" SEQUENCER"; 

<039> 

11065 

SYS 50966:SYS PR,6,5,F2*;"STOP" 

<00B> 

10045 IF NOT SQ THEN PRINT"<2SPACE>(KEIN 

S 

11070 

SR=0:IF NOT SU THEN 2140 

<069> 


ONB 

VORHANDEN)“ 

< 121 > 

11075 

RETURN 

<211 > 

10050 SYS 

PR,4,10,"TEMPO MODUS SEQNR<2SPAC 

11080 

REM RUN 

< 140> 


EJSOFT-EG" 

<034> 




10060 SYS 

PR,5,4, " t.CACCBAC_CC_C?.CCC.CJ-g.CCJ_C_C-g 






^C_C_C_C_C?" 

< 175> 




10070 SYS 

PR, 6 ,4,"2C4SPACE >2<5SPACE >2C5SPA 
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11085 

SYS 51093:SYS PR,6,5,F2*;"RUN “ 

< 165> 

11250 

IF USR(AD>=0 THEN PW=PW-1:RETURN 

< 167> 

11090 

SR=-1:RETURN 

<030> 

11260 

SYS DO,50312,AD:SE=PW 

<002> 

11100 

REM- 

<210> 

11270 

SYS DO,50314,USR(AD) 

<1B5> 

11110 

REM SEQUENCER-MODUS (SDNB/SEQ) 

<1B5> 

11280 

SYS 51116 :REM NEXTSEQ 

< 1B9> 

11112 

IF NOT SQ THEN RETURN 

< 192> 

11285 

SYS PR,6,22,F2*;RIGHT*(“ "+STR*(SE>, 


11115 

IF A=134 THEN 11130 

< 191 > 


3) 

<045> 

11120 

IF ft=135 THEN 11150 

<100> 

11290 

RETURN 

< 172> 

11125 

RETURN 

<005> 

11300 

REM- 

< 156> 

11130 

REM SONG-MODUS 

<167> 

11310 

REM SEQUENCER SOFT-EG-STEUERUNG 

<066> 

11135 

SM=0 :POKE PA,0 

<025> 

11320 

X=PEEK(PA) 

< 148> 

11140 

SYS PR,6,16,F2*j"SONG" 

< 174> 

11330 

FOR 1=0 TO 2 

<093> 

11145 

SYS PR,6,22,"I5SPACE >":RETURN 

< 139> 

11340 

: IF A< >133+1 THEN 11420 

<155> 

11150 

REM SEQUENZ-MODUS 

<203> 

11350 

: Y=2tl 

<032> 

11155 

SM—lsPOKE PA, 1:SYS PR,6, 16, "SEQ “ 

<122> 

11360 

: IF (X AND Y) THEN 11400 

<058> 

11160 

SYS PR,6,16,F2*;"SEQ “ 

<111> 

11370 

: X=X OR YrPDKE PA,X 

<251 > 

11165 

SE=<USR(50312)-USR(50310))/3+l 

< 1B6> 

11380 

: SYS PR,6,2B+3*I,F2*s"<RVSON>";I+l; 


11170 

SYS PR,6,22,F1*;RIGHT*(" "+STR*(SE), 



"<LEFT,SPACE>" 

<070> 


3) 

< 168> 

11390 

: GOTO 11420 

< 153> 

11175 

RETURN 

<055> 

11400 

: X=X AND (255—Y):POKE PA,X 

<227> 

11200 

REM- 

<054> 

11410 

: SYS PR,6,28+3*1,F2>;I+l;"<LEFT,SPA 


11210 

REM SEQUENZ-NUMMER 

<21B> 


CE>" 

<250> 

11220 

IF NOT SM THEN RETURN 

< 171> 

11420 

NEXT I:RETURN 

< 18B> 

11230 

IF PW=0 THEN PW=1:RETURN 

<0S3> 




11240 

AD=USR(50310)+(PW—1)*3 

<009> 
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Name : musik c800 c950 


c800 


15 

cB 

00 

31 

cB 

00 

31 

cB 

82 

c80B 

: 

00 

a4 

cB 

00 

a4 

cB 

00 

e9 

fl 

c810 

: 

CB 

00 

00 

00 

00 

lb 

cB 

21 

17 

c81B 

: 

c8 

27 

cB 

60 

61 

ef 

48 

ef 

49 

c820 

: 

00 

60 

61 

ef 

4B 

ef 

00 

0c 

c3 

cS28 

: 

6d 

93 

9a 

93 

Ba 

93 

9a 

93 

4f 

c830 

: 

00 

37 

cB 

69 

c8 

9d 

cB 

18 

f B 

c838 

: 

61 

ef 

0c 

ba 

24 

ef 

0c 

ba 

53 

c840 

: 

24 

et 

0C 

6d 

ba 

b6 

b6 

ba 

be 

c84B 

: 

b9 

b5 

b5 

b9 

18 

61 

b9 

4B 

84 

c850 

: 

ef 

0C 

c3 

24 

ef 

0C 

c3 

24 

71 

c8SS 

: 

et 

0C 

6d 

c3 

bb 

bb 

c3 

c2 

4f 

c860 


ba 

ba 

C2 

18 

61 

c2 

30 

ef 

fB 

c868 

: 

00 

0c 

61 

b3 

b5 

b6 

bS 

b3 

Bc 

C870 

: 

b5 

b6 

b5 

b3 

b5 

6d 

b6 

b3 

6d 

c878 

: 

b3 

b6 

b5 

b0 

b0 

b5 

1B 

61 

e6 

c8B0 

: 

b5 

30 

ef 

0C 

bB 

ba 

bb 

ba 

90 

c888 

: 

b8 

ba 

bb 

ba 

bB 

ba 

6d 

bb 

72 

c890 

: 

b8 

b8 

bb 

ba 

b5 

b5 

ba 

18 

0f 

c898 

: 

61 

ba 

30 

ef 

00 

0C 

6d 

8a 

8c 

cBafl 

: 

93 

9a 

93 

00 

aa 

cB 

bB 

cB 

cb 

c8aB 


de 

cB 

1B 

61 

ef 

79 

dl 

dl 

d2 

c8b0 


c8 

cB 

c6 

c6 

Cl 

61 

cl 

00 

95 

c8b8 


0c 

61 

c6 

cB 

ca 

c8 

c6 

cB 

df 

c8c0 


18 

ca 

0c 

cl 

c3 

c5 

c3 

cl 

76 

c8c8 

: 

c3 

18 

c5 

0c 

bb 

cl 

c3 

cl 

e7 

cBd0 

: 

bb 

cl 

18 

c3 

0c 

b6 

bB 

ba 

b9 

c8d8 

: 

bB 

b6 

b8 

18 

ba 

00 

1B 

61 

eb 

c8e0 

: 

ef 

4B 

79 

b6 

bl 

ab 

61 

a6 

74 

cBe8 

: 

00 

ef 

c8 

08 

c9 

2c 

c9 

1B 

6B 

cBf 0 

: 

61 

ef 

60 

ef 

ef 

ef 

ef 

06 

a9 

cBf B 

: 

67 

9a 

a5 

aa 

aa 

b5 

ba 

ba 

24 

c900 

: 

c5 

18 

61 

ca 

ef 

ef 

ef 

00 

cl 

c90B 

: 

0c 

61 

a5 

a6 

aB 

a6 

a5 

ef 

39 

c910 

: 

a6 

a5 

a3 

ef 

a5 

a3 

al 

ef 

4d 

c9ia 

: 

a3 

al 

a0 

ef 

60 

ef 

0c 

a3 

af 

c920 

: 

al 

9b 

3c 

ef 

60 

95 

1B 

b5 

la 

c928 

s 

ef 

Bf 

ef 

00 

0c 

61 

95 

96 

5a 

c930 

: 

98 

96 

95 

et 

96 

95 

93 

ef 

bb 

c938 

: 

95 

93 

91 

ef 

93 

91 

90 

ef 

el 

c940 

: 

60 

ef 

0c 

93 

91 

Bb 

3c 

ef 

54 

c94B 

: 

60 

Ba 

18 

aa 

ef 

ef 

ef 

00 

B7 


Listing 3. »Musik«, eine Tonfolge 
zum Testen des Sequenzers. Bitte 
mit dem MSE (Seite 158) eingeben. 


Name : sequencer.obj C4B0 c77a 


c4B0 

a 

4c 

39 

c7 

ff 

00 

00 

00 

ca 

f0 

c4BB 

: 

0c 

c8 

•4 

cB 

af 

cB 

C0 

cB 

10 

c490 

: 

e8 

cB 

18 

18 

1B 

00 

00 

00 

67 

c49B 


00 

09 

47 

09 

00 

00 

20 

20 

dl 

c4a0 

: 

20 

01 

02 

04 

00 

00 

00 

00 

42 

c4aB 

: 

00 

00 

01 

le 

B6 

18 

Be 

Bb 

27 

c4b0 

t 

96 

7e 

94 

f a 

aS 

06 

b3 

ac 

af 

c4bB 

: 

bd 

f 3 

c8 

e6 

d4 

Bf 

el 

fB 

cl 

c4c0 

: 

ee 

2e 

fd 

7d 

c6 

7d 

c6 

7d 

63 

c4cB 

: 

c6 

7d 

c6 

7d 

c6 

7d 

c6 

7d 

lc 

c4d0 

: 

c6 

7d 

c6 

fc 

c6 

95 

c5 

31 

38 

c4d8 

: 

ea 

ad 

14 

03 

Bd 

d7 

c4 

ad 

04 

c4e0 

s 

15 

03 

8d 

d8 

c4 

a9 

le 

8d 

22 


c4e8 

: 

14 

03 

a9 

c5 

8d 

15 

03 

a9 

82 

c4f 0 


e0 

8d 

06 

de 

a9 

2e 

Bd 

07 

04 

c4fB 

: 

de 

a9 

82 

8d 

0d 

de 

a9 

1 1 

7c 

C500 


Bd 

0f 

de 

60 

ae 

84 

c4 

bd 

f 6 

C50B 


8d 

c4 

85 

ff 

bd 

Bc 

c4 

85 

b7 

C510 


fe 

a0 

00 

bl 

fe 

fe 

Bc 

c4 

38 

c518 


d0 

03 

fe 

8d 

c4 

60 

ad 

0d 

fb 

C520 

: 

de 

48 

29 

02 

d0 

03 

4c 

al 

45 

c52B 


c5 

a5 

f e 

48 

a5 

ff 

48 

a5 

4f 

c530 


01 

29 

fe 

85 

01 

ad 

0d 

de 

a2 

cS38 

: 

a2 

0e 

8e 

B5 

c4 

a2 

04 

Be 

c4 

c540 

: 

84 

c4 

a2 

02 

Be 

B3 

c4 

20 

68 

cS4B 

: 

4d 

c6 

ce 

83 

c4 

30 

12 

ce 

d0 

C550 

: 

84 

c4 

ce 

84 

c4 

ad 

85 

c4 

d4 

C55B 

: 

38 

e9 

07 

Bd 

85 

c4 

4c 

47 

37 

C560 

: 

c5 

ad 

a7 

c4 

c9 

07 

d0 

0c 

ae 

c568 

: 

ad a9 c4 d0 07 20 ai 

c5 

bl 

c570 

: 

90 

c6 

b0 

le 

a2 

00 

bd 

a4 

be 

c57S 

: 

c4 

f0 

03 

20 

b3 

c5 

a2 

01 

6f 

c5B0 

: 

bd 

a4 

c4 

f 0 

03 

20 

b3 

c5 

6a 

C5B8 

: 

a2 

02 

bd 

a4 

c4 

f0 

03 

20 

4f 

c590 

: 

b3 

c5 

6c 

d5 

c4 

a5 

01 

09 

Bb 

c59B 

: 

01 

85 

01 

68 

85 

ff 

6B 

B5 

ae 

c5a0 


fe 

68 

0d 

0d 

de 

29 

01 

f0 

b4 

cSaB 

: 

04 

58 

6c 

d7 

c4 

6B 

aB 

6B 

fl 

c5b0 


aa 

68 

40 

Be 

B3 

c4 

Ba 

0a 

0d 

c5bB 


Bd 

84 

C4 

0a 

0a 

3B 

ed 

83 

lb 

c5c0 

: 

c4 

Bd 

85 

c4 

ad 

Ba 

c4 

B5 

92 

c5cB 

: 

fe 

ad 

8b 

c4 

B5 

ff 

ac 

B4 

2c 

c5d0 


c4 

bl 

f e 

99 

Bc 

c4 

cB 

bl 

d5 

c5dB 

: 

fe 

99 

8c 

c4 

4c 

7d 

c6 

ad 

86 

C5e0 

: 

BB 

c4 

1B 

69 

03 

Bd 

88 

c4 

46 

c5eB 


90 

03 

ee 

89 

c4 

ad 

B8 

c4 

4c 

c5f 0 

: 

85 

fe 

ad 

89 

c4 

85 

ff 

a0 

4b 

c5fB 


00 

bl 

f e 

Bd 

Ba 

c4 

cB 

bl 

97 

C600 

s 

fe 

f0 

31 

Bd 

Bb 

c4 

B5 

ff 

69 

c60B 


ad 

Ba 

c4 

85 

fe 

aB 

00 

bl 

34 

C610 

: 

fe 

99 

Bc 

c4 

cB 

C0 

06 

d0 

e3 

C61B 

s 

f 6 

a9 

00 

Bd 

98 

c4 

Bd 

99 

ae 

C620 

t 

c4 

Bd 

9a 

c4 

Bd 

a7 

c4 

a9 

66 

c628 

: 

01 

Bd 

9b 

c4 

Bd 

9c 

c4 

Bd 

5b 

c630 

: 

9d 

c4 

1B 

60 

ad 

aa 

c4 

f0 

67 

C638 

s 

0f 

ad 

B6 

c4 

Bd 

88 

c4 

ad 

e3 

C640 

s 

B7 

c4 

Bd 

89 

c4 

4c 

ed 

c5 

b0 

c648 

s 

20 

16 

c7 

3B 

60 

ae 

B3 

c4 

7t 

c650 

s 

bd 

9B 

c4 

f0 

22 

de 

98 

c4 

ad 

C658 

: 

f0 

01 

60 

ad 

aB 

c4 

d0 

0b 

al 

c660 

s 

bd 

9e 

c4 

29 

fe 

ae 

85 

c4 

cB 

c668 

: 

9d 

04 

d4 

ae 

83 

c4 

bd 

95 

93 

c670 

3 

c4 

f0 

0a 

9d 

9b 

c4 

60 

de 

02 

c678 


9b 

c4 

f0 

01 

60 

ae 

83 

c4 

e5 

c680 

: 

a9 

00 

9d 

a4 

c4 

20 

04 

c5 

0e 

C6B8 

: 

c9 

00 

d0 

12 

ae 

83 

c4 

ad 

3d 

c690 


a7 

c4 

ld 

■ i 1 

c4 

8d 

a7 

c4 

f 6 

C69B 

s 

a9 

01 

9d 

a4 

c4 

60 

10 

15 

77 

c6a0 

s 

c9 

fB 

90 

29 

29 

07 

0a 

aa 

77 

c6a8 

: 

bd 

c3 

c4 

85 

fe 

bd 

c4 

c4 

a3 

c6b0 

: 

85 

ff 

6c 

fe 

00 

c9 

61 

b0 

65 

c6bB 

: 

09 

ae 

B3 

c4 

9d 

92 

c4 

4c 

ac 

c6c0 

: 

7d 

c6 

e9 

61 

ae 

83 

c4 

9d 

9c 

c6cB 

: 

95 

c4 

4c 

7d 

c6 

a8 

ae 

83 

f 5 

c6d0 

: 

c4 

bd 

92 

c4 

9d 

98 

c4 

98 

93 

c6dS 

: 

29 

0f 

c9 

0c 

90 

01 

60 

0a 

23 

c6e0 

: 

aa 

98 

4a 

4a 

4a 

4a 

aB 

bd 

c7 

c6eB 

: 

ac 

c4 

85 

fe 

bd 

ab 

c4 

C0 

05 

c6f 0 


0e 

f0 

06 

46 

fe 

6a 

cB 

d0 

c9 

c6f 0 

: 

f 6 

6c 

d3 

c4 

ae 

BS 

c4 

9d 

17 


c700 

: 

00 

d4 

a5 

f e 

9d 

01 

d4 

ae 

46 

c708 

: 

83 

c4 

bd 

9e 

c4 

09 

01 

ae 

26 

c710 

: 

85 

c4 

9d 

04 

d4 

60 

a9 

00 

d6 

c718 

: 

8d 

0f 

de 

a9 

02 

8d 

0d 

de 

14 

c720 

: 

ad 

9e 

c4 

Bd 

00 

d4 

8d 

07 

ea 

c728 

: 

d4 

Bd 

0e 

d4 

ad 

d7 

c4 

Bd 

a9 

c730 

: 

14 

03 

ad 

d8 

c4 

8d 

15 

03 

5f 

c738 


60 

78 

a5 

fe 

48 

a5 

ff 

48 

60 

c740 


ad 

86 

c4 

8d 

BB 

c4 

ad 

87 

88 

c74B 


c4 

Bd 

89 

c4 

20 

ed 

c5 

90 

77 

c750 

: 

02 

b0 

le 

a9 

08 

a2 

49 

Bd 

3d 

c75B 


05 

d4 

8e 

06 

d4 

Bd 

0c 

d4 

bf 

c760 

: 

Se 

0d 

d4 

8d 

13 

d4 

8e 

14 

96 

c76B 

: 

d4 

a9 

0f 

8d 

18 

d4 

20 

d9 

e3 

c770 

: 

c4 

68 

85 

ff 

68 

85 

fe 

58 

29 

c778 

: 

60 

00 

41 

00 

41 

00 

53 

ff 

8a 


Listing 4. »Sequencer.Obj«, die 
Sequenzer-Maschinenroutine 


Name : kobold.song 9a0B 9b75 


9aB8 

: 

5f 

9b 

01 

61 

ef 

00 

00 

8a 

b4 

9a 10 

: 

9a 

0a 

9a 

15 

9a 

0c 

6d 

93 

df 

9alB 

: 

9a 

93 

8a 

93 

9a 

93 

00 

25 

21 

9a20 

: 

9a 

5f 

9a 

98 

9a 

18 

61 

ef 

f 3 

9a28 

: 

0c 

61 

ba 

24 

61 

ef 

0c 

61 

a0 

9a30 

: 

ba 

24 

61 

ef 

0c 

6d 

ba 

b6 

d7 

9a3B 

: 

b6 

ba 

b9 

b5 

b5 

b9 

18 

79 

ed 

9a40 

: 

b9 

ef 

0c 

61 

c3 

24 

61 

ef 

e3 

9a4B 

: 

0c 

61 

c3 

24 

61 

ef 

0c 

6d 

lb 

9a50 

: 

c3 

bb 

bb 

c3 

c2 

ba 

ba 

c2 

ca 

9a5B 

: 

18 

61 

c2 

30 

61 

ef 

00 

0c 

85 

9a6B 

8 

61 

b3 

b5 

b6 

bS 

b3 

b5 

b6 

lc 

9a68 

8 

b5 

b3 

b5 

Bc 

6d 

b6 

b3 

b3 

a8 

9a70 

3 

b6 

bS 

b0 

b0 

b5 

18 

79 

b5 

b0 

9a7B 

8 

0c 

6d 

ef 

0c 

61 

bB 

ba 

bb 

f 6 

9aQ0 

8 

ba 

bB 

ba 

bb 

ba 

b8 

ba 

0c 

31 

9a8B 

3 

6d 

bb 

bB 

bB 

bb 

ba 

b5 

b5 

ec 

9a90 

8 

ba 

18 

79 

ba 

0c 

6d 

ef 

00 

f 8 

9a9B 

8 

0c 

6d 

Ba 

93 

9a 

93 

00 

a5 

01 

9aa0 

8 

9a 

bB 

9a 

db 

9a 

0c 

6d 

ef 

5B 

9aaB 

8 

dl 

•f 

dl 

ef 

c8 

ef 

c8 

ef 

f 2 

9ab0 

3 

c6 

ef 

c6 

ef 

cl 

ef 

cl 

00 

C0 

9ab8 

8 

0c 

61 

c6 

cB 

ca 

c8 

c6 

cB 

df 

9ac0 

8 

ca 

ef 

cl 

c3 

c5 

c3 

cl 

c3 

74 

9ac8 

8 

c5 

ef 

bb 

Cl 

c3 

cl 

bb 

cl 

69 

9ad0 

8 

c3 

ef 

b6 

b8 

ba 

b8 

b6 

bB 

0d 

9adB 

8 

ba 

ef 

00 

18 

61 

ef 

30 

61 

a6 

9ae0 

8 

b6 

ef 

bl 

ef 

ab 

mi 

a6 

1B 

fd 

9aeB 

8 

61 

ef 

00 

fl 

9a 

0b 

9b 

35 

5a 

9af 0 

8 

9b 

18 

61 

ef 

60 

61 

ef 

ef 

9e 

9af B 

8 

ef 

ef 

0c 

61 

9a 

a5 

aa 

aa 

e5 

9b00 


b5 

ba 

ba 

c5 

18 

61 

ca 

48 

c2 

9b0B 

8 

61 

ef 

00 

0c 

61 

a5 

a6 

a8 

12 

9b 10 


a6 

a5 

ef 

*6 

•5 

a3 

ef 

a5 

de 

9b 1B 

8 

a3 

al 

ef 

a3 

al 

a0 

ef 

60 

9c 

9b 20 


61 

mf 

0c 

61 

a3 

al 

9b 

ef 

3e 

9b28 

: 

30 

61 

et 

60 

61 

95 

18 

61 

f 7 

9b30 

8 

b5 

48 

61 

ef 

00 

0c 

61 

95 

71 


Listing 5. »Kobold.Song«, ein 
Beispiel-Musikstück zu Listing 4 
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C64 


MUSIK 


9b3B 

: 

96 

98 

96 

95 

ei 

96 

95 

93 

a4 

9b40 

: 

ef 

95 

93 

91 

ei 

93 

91 

90 

14 

9b4B 

: 

ei 

60 

61 

ei 

0c 

61 

93 

91 

fb 

9b50 

: 

Bb 

ei 

30 

LI 

ei 

60 

61 

85 

9e 

9b5B 

: 

18 

61 

a5 

48 

61 

ef 

00 

0f 

47 

9b60 

: 

9a 

00 

1 i 

9a 

00 

1 i 

9a 

00 

79 

9b68 

: 

9f 

9a 

00 

9f 

9a 

00 

eb 

9a 

d7 

9b 70 

: 

00 

00 

00 

00 

00 

00 

00 

00 

71 


Listing 5. (Schluß) 


Name 

* 

seq.Erg.obj 



c739 cB55 

c739 

: 

7B 

aS 

fe 

48 

a5 

ff 

48 

a9 

lb 

c741 

t 

ea 

a2 

02 

9d 

35 

c5 

9d 

a2 

ee 

c749 

: 

c5 

bd 

92 

c7 

9d 

5b 

c6 

ca 

t0 

C751 

: 

10 

fi 

ad 

86 

c4 

8d 

88 

c4 

fa 

C759 

c 

ad 

87 

c4 

Sd 

89 

c4 

20 

ed 

cB 

C761 

: 

c5 

a9 

e2 

8d 

d7 

c4 

a9 

c3 

37 

c769 

: 

8d 

dB 

c4 

a9 

le 

8d 

14 

03 

6d 

c771 

: 

a9 

c5 

8d 

15 

03 

a9 

d7 

8d 

fb 


c779 

: 

d3 

c4 

a9 

c7 

Bd 

d4 

c4 

a9 

f 7 

c781 

: 

82 

Bd 

0d 

de 

.19 

11 

Bd 

0f 

20 

c7B9 

: 

de 

6B 

B5 

ff 

68 

B5 

fe 

5B 

5a 

C791 


60 

4c 

be 

c7 

78 

a9 

le 

Bd 

28 

C799 

: 

14 

03 

a9 

c5 

8d 

15 

03 

a9 

33 

c7al 

: 

82 

Bd 

Bd 

de 

a9 

11 

8d 

0f 

40 

c7a9 

: 

de 

58 

60 

78 

a5 

fe 

48 

a5 

97 

c7bl 

: 

ff 

48 

20 

ed 

c5 

68 

85 

ii 

50 

C7b9 

: 

6B 

85 

fe 

5B 

60 

ae 

83 

c4 

c2 

c7c 1 

: 

bd 

al 

c4 

2c 

7f 

c4 

f0 

08 

f 7 

c7c9 

: 

ad 

48 

C0 

29 

fe 

Bd 

48 

cO 

ef 

c7dl 

: 

ad 

a8 

c4 

4c 

5e 

c6 

ae 

85 

6f 

c7d9 

: 

c4 

9d 

00 

C0 

a5 

fe 

9d 

01 

4f 

c7el 

: 

C0 

a5 

fb 

48 

a5 

fc 

48 

a5 

2 a 

c7e9 

: 

fd 

48 

86 

fe 

20 

6a 

c2 

ae 

49 

c7f 1 

t 

83 

c4 

bd 

18 

C0 

dO 

12 

ae 

Bl 

c7f 9 

t 

85 

c4 

bd 

05 

C0 

9d 

00 

d4 

93 

c801 

s 

bd 

06 

C0 

9d 

01 

d4 

4c 

2c 

e5 

c809 

: 

cB 

20 

43 

c2 

ae 

85 

c4 

bd 

b0 

cBll 

: 

06 

C0 

85 

fd 

20 

.16 

i 0 

ae 

30 

cB19 

: 

85 

c4 

18 

bd 

05 

C0 

65 

f b 

a2 

cB21 

: 

9d 

00 

d4 

bd 

06 

C0 

65 

i c 

al 

c829 

: 

9d 

01 

d4 

ae 

83 

c4 

bd 

al 

ea 

c831 

: 

c4 

2c 

7f 

c4 

f0 

08 

ad 

48 

la 

CB39 

: 

C0 

09 

01 

Bd 

48 

C0 

bd 

9e 

2f 


c841 : c4 09 01 ae 85 c4 9d 04 9d 
cE49 : d4 68 85 fd 68 85 fc 68 ea 
c851 : 85 f b 60 00 0c c3 24 ef 3b 

Listing 6. »Seq.Erg.obj« (Schluß) 


Name : test.song 9a0B 9a5b 


9a08 s 

4e 

9a 

01 

61 

ei 

00 

00 

15 

39 

9a 10 : 

9a 

0a 

9a 

0a 

9a 

06 

67 

b0 

70 

9al8 : 

b2 

b4 

b5 

b7 

b9 

bb 

C0 

C0 

87 

9a20 : 

ba 

b8 

b7 

b5 

b3 

b2 

b0 

00 

6e 

9a 28 : 

2e 

9a 

38 

9a 

43 

9a 

12 

67 

25 

9a30 : 

c 0 

C0 

C0 

bb 

48 

79 

C0 

00 

4b 

9a3S : 

12 

67 

b7 

b9 

24 

6d 

b7 

48 

40 

9a40 : 

79 

b7 

00 

12 

67 

b4 

b5 

24 

12 

9a4B : 

6d 

b2 

48 

79 

b4 

00 

0f 

9a 

0c 

9a50 : 

00 

Bf 

9a 

00 

28 

9a 

00 

00 

d6 

9a5B : 

00 

00 

00 

30 

61 

ef 

00 

0c 

0c 


Listing 7. »Test.song«, zum Testen 
des Sequenzers 


100H 

REM ****************************** 

<036> 

2240 

IF L>3 THEN 2500 

<056> 

11310 

REM * 


* 

<041 > 

2250 

N=1 

<1B7> 

1020 

REM * LESEPROGRAMM 

* 

<07B> 

2260 

IF L*=MID*CNN*,N,1) THEN 2300 

<081 > 

1030 

REM * FUER 

SEQUENCER-DATEN 

* 

<220> 

2270 

N=N+1:IF N<13 THEN 2260 

<062> 

1040 

REM * 


* 

<073> 

2280 

GOTO 2500 : REM KEINE NOTE 

<089> 

1050 

REM * ERZEUGT AUS DATA-ZEILEN 

* 

<101> 

2300 

R*=RIGHT*(AS,1):0=VAL (RS) 

<204> 

1060 

REM * EINEN ABSOLUT LADBAREN 

* 

< 205> 

2310 

IF 0=0 AND R*<>"0" THEN 2420 

<00B> 

1070 

REM * DATENSATZ FUER SEQUENCER 

* 

<064> 

2320 

IF 0>6 THEN 2420 

<005> 

1080 

REM * 


* 

<113> 

2330 

IF L=2 THEN 3000 

<255> 

1090 

REM * THOMAS 

KRAETZIG SEP 85 

* 

<000> 

2340 

M*=MID*(A*,2,1) 

< 151 > 

1100 

REM * 


* 

<133> 

2350 

IF M*="#“ THEN N=N+1:GOTO 3000 

< 157> 

1110 

REM ****************************** 

< 148> 

2360 

IF M*="B” THEN N=N-1:G0T0 3000 

<0B7> 

1111 

REM 



< 157> 

2380 

F*="NUR "+L*+"#"+R*+" ODER "+L*+"B"+R 


1112 

REM SPEICHERENDE HERUNTERSETZEN 


<060> 


* 

<039> 

1115 

REM 



< 161 > 

2390 

FS=FS+" ODER "+LS+RS+" MOEGLICH" 

<005> 

1117 

POKE 56,144 



<238> 

2400 

GOTO 5000 

<086> 

1120 

REM 



< 166>i 

242» 

FS=" OKTAVBEREICH 0-6" 

<030> 

1130 

REM KONSTANTEN UND 


<096> 

2430 

GOTO 5000 

< 116> 

1140 

REM VARIABLEN MIT VORBESETZUNGEN 


< 187> 

2500 

REM 

<020> 

1150 

REM 



<196> 

2510 

REM NACH / ODER - SUCHEN 

<112> 

1160 

DIM SF <200) :REM SEQUENZFOLGELISTE 

<159> 

2520 

REM 

<040> 

1170 

DIM SA(200) :REM SEQUENZADRESSENL. 

<002> 

2530 

M*=MID*(A*,2,1> 

<0B5> 

1180 

DIM TA(3) 

REM TRACKADRESSEN 


<010> 

2540 

IF M*<>"/" AND M*<>"-" THEN 2560 

<096> 

1190 

REM NOTENNAMEN 


< 103> 

2550 

R*=R IGHT* (AS , L—2 ) : GOTO 2600 

<003> 

1200 

NNS="CCDDEFFGGAAH" 


< 191 > 

2560 

MS=MIDS(AS,3,1> 

< 121 > 

1210 

DNS="" 

REM DATEINAME 


<064> 

2570 

IF MSO"/" AND MS< " THEN 5000 

<136> 

1220 

S=1 

REM AKTUELLE SEQUENZ 

<217> 

2580 

LS=LEFTS(AS,2):RS=RIGHT* < AS,L-3) 

< 122> 

1230 

T=1 

REM AKTUELLER TRACK 


<157> 

2600 

REM 

< 122> 

1240 

AD=0 

REM ALLG. ADRESSE 


< 119> 

2610 

REM ZAEHLER UND NENNER UNTERSUCHEN 

< 155> 

1250 

SA=39432 : REM S9A08 


<062> 

2620 

REM 

<142> 

1260 

Q=96 

REM QUANTISIERUNG 


<248> 

2630 

Z=VAL(LS) 

<007> 

1270 

R=0.5 :REM GATE ON/LAENGE 


< 170> 

2640 

IF Z>0 AND Z<99 THEN 2670 

< 177> 

1280 

NL=l/4 

REM NOTENLAENGE 


< 191 > 

2650 

F*="ZAEHLER—BEREICH 1 BIS 99" 

<044> 

1290 

L=0 

REM STRINGLAENGE 


<031 > 

2660 

GOTO 5000 

<092 > 

1300 

SV=12*4096 

REM SAVE-ROUTINE 


<214> 

2670 

N=VAL(RS) 

<128> 

1500 

REM- 

--- 


<096> 

2680 

IF N>0 OR MS="—" THEN 2710 

< 103> 

1510 

REM PROGRAMMSTART 


< 141 > 

2690 

F*=”NENNER MUSS GROESSER 0 SEIN" 

<200> 

1520 

REM- 



< 116> 

2700 

GOTO 5000 

<132> 

1530 

REM SAVE-MASCHINENPROGRAMM 


< 107> 

2710 

IF MS="/" THEN 3200 :REM ZEIT 

<208> 

1540 

FOR 1=0 TO 17 


<137> 

2720 

IF MS="—" THEN 3400 :REM ON/OFF 

< 139> 

1550 

READ XsPOKE SV+I,X:NEXT I 


< 129> 

2730 

GOTO 5000 

< 162> 

2020 

REM 



<04B> 

3000 

REM- 

<072> 

2030 

REM DUMMY-TRACK ERZEUGEN 


<040> 

3010 

REM NOTE (TONNUMMER N OKTAVE 0) 

< 197> 

2040 

AD=SA+2 



< 153> 

3020 

REM- 

<092> 

2050 

POKE AD ,1 

:POKE AD+1,97 


<172> 

3030 

IF N=0 THEN N=12:0=0-1 

<157> 

2060 

POKE AD+2,239:POKE AD+3,0 


<094> 

3040 

IF N=13 THEN N=1 : 0=0+1 

< 113> 

2070 

H0=INT(AD/256):L0=AD-256*H0 


< 191 > 

3050 

POKE AD , 128+16*0+N— 1: AD=AD+1 

<051 > 

2080 

AD=AD+4:A*=" 



<215> 

3060 

GOTO 2110 

<006> 

2100 

REM NAECHSTES DATUM LESEN 


<042> 

3100 

REM- 

< 174> 

2110 

PRINT" ";AS;:READ AS 


<201 > 

3110 

REM PAUSE 

<050> 

2120 

L=LEN(A*> :L*= 

=LEFT*(AS,1> 


<039> 

3120 

REM- 

<194> 

2150 

IF AS="P" 

THEN 3100 


< 197> 

3130 

POKE AD,239:AD=AD+1:GOTO 2110 

<214> 

2160 

IF A*="PAUSE 

THEN 3100 


< 108> 

3200 

REM- 

<018> 

2165 

IF A*="TRACK 

THEN 3800 


<208> 

3210 

REM ZEIT (NOTENDAUER) 

< 178> 

2170 

IF A*="SEQUENZ " THEN 4000 


<080> 

3220 

REM- 

<038> 

2175 

IF A*="SEQUENZFOLGE" THEN 3600 


<018> 

3230 

T=INT(Q*Z/N) :REM GESAMTZEIT 

<0B9> 

2190 

IF A*="ENDE” 

THEN 4300 


<168> 

3240 

AN=INT<R*Q*Z/N):REM GATE-ON-ZEIT 

<099> 

2200 

REM 



<230> 

3250 

OF=T—AN :REM GATE—OFF—ZEIT 

<093> 

2210 

REM NACH NOTENNAMEN SUCHEN 


<184> 




2220 

REM 



<250> 

Listing 8. Das Leseprogramm für Sequenzer-Daten. 

2230 

IF L=1 THEN 5000 


< 122> 

Bitte mit dem Checksummer (Seite 158) eingeben 

. 
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3260 

3270 

32B0 

3290 

3300 

3310 

3320 

3330 

3340 

3400 

3410 

3420 

3430 

3440 

3600 

3610 

3620 

3630 

3640 

3650 

3660 

3670 

3680 

3690 

3700 

3800 

3810 

3820 

3830 

3840 

3850 

3860 

3870 

3880 

3890 

3900 

3910 

3920 

3930 

3940 

4000 

4010 

4020 

4030 

4040 

4050 

4060 

4070 

4080 

4090 

4100 

4110 

4120 

4130 

4140 

4150 

4160 

4300 

4310 

4320 

4330 

4340 

4350 

4360 

4370 

4380 

4390 

4400 

4410 

4420 

4430 

4440 

4450 

4460 

4470 

4500 

4510 

4520 

4530 

4540 

4550 

4560 

4570 

4580 

4590 


IF AN<=96 THEN 3290 

F*="GATE—ON—ZEIT ZU GROSS" 

SOTO 5000 

IF 8F<=30 THEN 3320 

F*=* BÄTE—OFF—ZEIT ZU GROSS" 

GOTO 5000 
POKE AD,AN:AD=AD+1 
POKE AD , OF+97: AD=AD+1 
GOTO 2110 

REM- 

REM VERHAELTNIS GATE—ON/GESAMTZEIT 
REM (Z/N = GATE ON/BATE-OFF) 

REM- 

R=Z/(Z+N): GOTO 2110 

REM- 

REM SEQUENZFOLGE 

REM- 

PRINT:PRINT:AS=0 

PRINT" ";A*;:READ A$:A=INT<VAL<A*>) 

IF A=0 THEN 3670 

SF < AS)=A:AS=AS+1:GOTO 3640 

IF A*<>"0" THEN 3690 

PRINT" 0":READ A*:GOTO 2120 

F*="LISTE MUSS MIT 0 ABGESCHLOSSEN SE 

IN" 

GOTO 5000 

REM- 

REM TRACK 

REM- 

PRINT:PRINT:PRINT AS; 

READ A*:A=INT(VAL(A*>> 

IF A>=1 AND A<=3 THEN 3880 
F*="NUR 1,2,3 ZULAESSIG" 

GOTO 5000 
PRINT A:T=A 

IF NS THEN NS=0:GOTO 3910 
POKE AD,0:AD=AD+1 
HI=INT(AD/256):L0=AD-256*HI 
POKE SA(S)+(T—1)*2,LO 
POKE SA(S)+(T—1)*2+1,HI 
READ AS:GOTO 2120 

REM- 

REM SEQUENZ 

REM- 

PRINT:PRINT:PRINT:PRINT A*; 

READ AS:A=INT(VAL(A*>> 

IF A>=1 AND A<=200 THEN 4080 
F$="NUR 1-200 ZULAESSIG" 

GOTO 5000 
PRINT A:S=A 

POKE AD,0:AD=AD+1:NS=-1:SA(S)=AD 
REM TRACK-ZEIGER AUF DUMMY-TRACK 
REM INITIALISIEREN 
POKE AD , L0: POKE AD+1.H0 
POKE AD+2,L0:POKE AD+3.H0 
POKE AD+4,L0:POKE AD+5,H0 
AD=AD+6 

READ A*:GOTO 2120 

REM- 

REM ENDE 

REM SEQUENZFOLGELISTE AUFBAUEN 
REM- 

PRINT:PRINT A* 

POKE AD,0:AD=AD+1 
HI=INT(AD/256):L0=AD-256*HI 
POKE SA,LO:POKE SA+1,HI 
FOR 1=0 TO AS-1 

: X=SA(SF <I)):IF X>0 THEN 4410 
: PRINT"SEQUENZ";I;"NICHT DEFINIERT": 
GOTO 4420 

: HI=INT(X/256):LO=X—256*HI 
: POKE AD+3*I,L0 
: POKE AD+3*I+1,HI 
: POKE AD+3*I+2,0 
NEXT I 

FOR 1=0 TO 2:POKE AD+3*AS+I,0:NEXT 

AD=AD+3*AS+3 

REM 

REM BEREICH SA-AD AUF DISK 
REM 

INPUT " ABSPEICHERN (J /N) " ; A* 

IF A*<>"J“ THEN END 

INPUT"DATEINAME T9SPACE>";DN* 

AH=INT(SA/256):AL=SA-256*AH 
EH=INT(AD/256):EL=AD-256*EH 
OPEN 1,8,1, DNS 
POKE 252,AL:POKE 253,AH 


<041 > 

< 154> 
<204> 
<198> 

< 185> 
<234> 
<248> 
<081 > 
<034> 
< 220 > 
< 120 > 

< 103> 
<250> 

< 166> 
< 166 > 
<021 > 
<1B6> 
<108> 
<146> 
<173> 
<001 > 
<032> 
<053> 


< 133> 

< 116> 
< 110 > 
<160> 
<130> 
<201 > 
<075> 
<057> 
<050> 
<032> 
<047> 
<0B9> 
<054> 
<074> 
< 012 > 
<167> 
<003> 


<056> 
<023> 
<076 > 
<250> 
<019> 
<043> 
<223> 
<232> 
<215> 
< 157> 
<03B> 


< 212 > 
<083> 
< 144> 
<028> 


< 10B> 

<225> 

< 102 > 
<027> 


<081 > 


<132> 
<021 > 
<250> 
<016> 

< 135> 
<246> 

< 163> 


< 177> 
<073> 
<045> 

< 129> 
<062> 
<216> 
< 212 > 

< 179> 
<244> 
<0B2> 
<008> 
<211 > 

< 123> 

< 164> 
<079> 
<061 > 

< 135> 
<15B> 


4600 

PDKE 

780,252 

< 119> 

4610 

POKE 

781,EL:POKE 782,EH 

<040> 

4620 

SYS SV:CLOSE 1 

< 176> 

4630 

5000 

5010 

END 

DCM 


<060> 

<040> 

<140> 

REM FEHLER 

5020 

RFM 






5030 

PRINT:PRINT 

< 156> 

5040 

PRINT"FEHLERHAFTES DATUM: ";A* 

<023> 

5050 

IF F*<>"" THEN PRINT F* 

< 192> 

5060 

PRINT:A*="":F*="":GOTO 2110 

< 151 > 

7000 

(vCTM 


<008> 



7010 

REM SAVE-ROUTINE 

<202> 

7020 

7030 



<02B> 

<250> 

DATA 

072,165,001,041,254,133,001 

7040 

DATA 

104,032,216,255,165,001,009 

< 191 > 

7050 

8000 

DATA 

ßPM 

001,133,001,096 

<214> 

•<24B> 



8010 

REM MUSIKSTUECK 

<253> 

8020 

8030 

8100 

REM 

RfTM 

EDVARD GRIEG KOBOLD) 

<056> 

<022> 

<058> 

DATA 

SEQUENZ,1 

8110 

DATA 

TRACK,3 

<240> 

8120 

DATA 

1-1,1/4,EB1,HB1,EB1,HB0 

< 171 > 

8130 

DATA 

EB1,HB1,EB1 

< 121 > 

8140 

REM 


<072> 

8200 

DATA 

SEQUENZ,2 

<055> 

8210 

DATA 

TRACK,1 

< 145> 

8220 

DATA 

1-0,1/4,P,1/8,HB3,3/8,P 

<13B> 

8230 

DATA 

1/B,HB3,3/8,P,1—1,1/4 

<092> 

8240 

DATA 

HB3 , GB3 , GB3 , HB3 , A3 , F3 , F3 , A3 

<231 > 

8250 

DATA 

1/2,A3,P,1-0 

<236> 

8260 

DATA 

1/8,EB4,3/8,P,1/8,EB4,3/8,P 

< 107> 

8270 

DATA 

1—1,1/4,EB4,CB4,CB4,EB4 

<130> 

8280 

DATA 

D4 , HB3 , HB3 , D4 , 1 —0,1 /4, D4 

<067> 

8290 

DATA 

1/2,P 

<098> 

8300 

DATA 

TRACK,2 

<236> 

8310 

DATA 

1—0,1/8,EB3,F3 

< 174> 

8320 

DATA 

GB3,F3,EB3,F3,GB3,F3,EB3,F3 

< 136> 

8330 

DATA 

1—1,1/4,GB3,EB3,EB3,GB3 

<173> 

8340 

DATA 

F3,C3,C3,F3,1/2,F3,1/4,P 

<0B4> 

8350 

83&£ 

DATA 

r^TA 

1—0,1/8,AB3,HB3 

CB4 , HB3 , AB3 , HB3 

CB4,HB3,AB3,HB3,1—1,1/4 

<002> 

< 137> 

< 199> 

8370 

DATA 

8380 

DATA 

CB4, AB3 , AB3 , CB4 , HB3 , F3 , F3 , HB3 

< 132> 

8390 

DATA 

1/2,HB3,1/4,P 

< 137> 

8400 

DATA 

TRACK,3 

<081 > 

8410 

DATA 

1—1,1/4,HB0,EB1, HB1 , EB1 

<057> 

8420 

REM 


<003> 

8430 

DATA 

SEQUENZ,3 

<033> 

8440 

DATA 

TRACK,1 

<119> 

8450 

DATA 

1-1,1/4,P 

<063> 

8460 

DATA 

DB5,P,DB5,P,AB4,P,AB4,P 

<14B> 

8470 

DATA 

GB4,P,GB4,P,DB4,P,DB4 

< 170> 

8480 

DATA 

TRACK,2 

< 161 > 

8490 

DATA 

1-0,1/8 

<029> 

8500 

DATA 

GB4 , AB4 , HB4, AB4, GB4 , AB4 , HB4 , P 

< 102> 

B510 

DATA 

DB4,EB4,F4,EB4,DB4,EB4,F4,P 

<200> 

8520 

DATA 

CB4,DB4,EB4,DB4,CB4,DB4,EB4,P 

< 144> 

8530 

DATA 

GB3,AB3,HB3,AB3,GB3,AB3,HB3,P 

<254> 

8540 

DATA 

TRACK,3 

< 162> 

8550 

DATA 

1-0,1/4,P,1/2 

<079> 

8560 

DATA 

BB3,P,DB3,P,CB3,P,GB2,1/4,P 

<105> 

8570 

REM 


<250> 

8600 

DATA 

SEQUENZ,4 

<074> 

8610 

DATA 

TRACK,1 

<22B> 

8620 

DATA 

1—0,1/4,P,1/1,P,P,P,P,1/8 

<02B> 

8630 

DATA 

HB1,F2,HB2,HB2,F3,HB3,HB3,F4 

< 125> 

8640 

DATA 

1/4,HB4,3/4,P 

<222> 

8650 

DATA 

TRACK,2 

<014> 

8660 

DATA 

1—0,1/8,F2,GB2,AB2,GB2,F2,P 

<126> 

8670 

DATA 

GB2,F2,EB2,P,F2,EB2,DB2,P 

< 11B> 

8680 

DATA 

EB2,DB2,C2,P,l/l,P,l/8 

<14B> 

8690 

DATA 

EB2,DB2,CB2,P,1/2,P 

< 1B3> 

8700 

DATA 

1/1,Fl,1/4,F4,3/4,P 

<015> 

8710 

DATA 

TRACK,3 

<078> 

8720 

DATA 

1-0,1/8,Fl,GBl,ABI,GBl,Fl,P 

<146> 

8730 

DATA 

GBl,F1,EB1,P,F1,EB1,DB1,P 

<095> 

8740 

DATA 

EB1,DB1,C1,P,1/1,P,1/B 

< 160> 

B750 

DATA 

EB1, DB1 , CB1 ,P,1/2,P 

< 179> 

8760 

DATA 

1/1,F0,1/4,F2,3/4,P 

<075> 

8800 

REM 


<226 > 

8810 

DATA 

SEQUENZFOLGE,1,2,2,3,3,4,0 

<U0> 

8820 

DATA 

ENDE 

<173> 


Listing 8. Das Leseprogramm für Sequenzer-Daten 
(Schluß). 
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C64 


TIPS & TRICKS 


Einzeller: ein Muß für jeden 


Oft weiß man nicht, wie man schwierige Pro¬ 
grammabläufe ohne ellenlange Listings meistern 
kann. Wir zeigen, wie’s kurz und bündig geht. 


Bi 


I ei der Eingabe der folgenden Einzeiler sollte darauf 
.geachtet werden, alles ohne Leerzeichen einzuge- 
’ben. Die Basic-Befehle müssen außerdem abgekürzt 
werden. Die Basic-Abkürzungen stehen im C64-Handbuch 
auf Seite 130-131. So wird zum Beispiel der Befehl" POKE " 
abgekürzt, indem man <P> eintippt und dann die SHIFT- 
Taste drückt und gleichzeitig <0> eingibt. Dies muß bei 
vielen Einzeilern gemacht werden, weil sonst die zulässige 
Zeichenanzahl von 80 Zeichen pro Basiczeile (eine Basic- 
zeile = zwei Bildschirmzeilen) überschritten wird. 


Joystickabfiuge 


Jeder Neuling unter den C64-Fans wird sich früher oder 
später fragen, warum im C 64 gleich zwei Joystick-Ports 
eingebaut sind, das Basic des C 64 aber keine Funktion be¬ 
sitzt, um diese Joysticks auch abzufragen. Dieser Einzeiler 
realisiert die Joystick-Abfrage. Wenn man nun am Anfang, 
vor der Joystickabfrage, folgende Zeile schreibt: 

0 DEFNJOY(X)=INT(LOG(255.5-(PEEK(56322-x)0R224)))/ 
L0G(2)+2) 

Dann läßt sich über »Print FN JOY(1)« der Joystick 1 ab- 
fragen. Auch den Port 2 kann man über »PRINT FN JOY(2)« 
auslesen. 

Zum Testen des Programms sollte man eine zweite Zeile 
eingeben: 

1 PRINT FN J0Y(1) : GOTO 0 

In dieser Zeile wird der Joystick abgefragt, die entspre¬ 
chende Joystickposition ausgegeben (siehe unten) und 
wieder in die erste Zeile gesprungen, um den Joystick er¬ 
neut abzufragen. Folgende Stellungen sind möglich: 

1 :Nullstellung, 2:oben, 3:unten, 4:links, 5:rechts und 6 Feu¬ 
erknopf. 

Über eine »ON FN JOY(1) GOTO ...«-Anweisung ließe 
sich dann in entsprechende Unterprogramme verzweigen. 

Explodierender Bildschirm 

Oft denkt man, wenn bei einem Spiel das eigene Raum¬ 
schiff getroffen wird und der Bildschirm »explodiert«, an 
hochqualifizierte Maschinensprache. Daß dies auch von 
Basic aus möglich ist, wissen nur die wenigsten. Folgender 
Einzeiler zeigt, wie man »Bildschirmexplosionen« ins eige¬ 
ne Programm einbinden kann. 

1 FOR 1=1 TO 255:POKE 53270,I:NEXT I:G0T0 1 


genden Text. Nach dem letzten Wort sollte ein Leerzeichen 
stehen. Das rechtsbündige Zeichen des Strings steht zwei¬ 
mal auf dem Bildschirm, da es nicht gelöscht wird. 

— Vor Programmaufruf sollte der Bildschirm gelöscht wer¬ 
den, da sonst auch der restliche Bildschirminhalt verscho¬ 
ben wird. 

— Auch andere Steuerzeichen außer dem hier verwende¬ 
tem HOME können eingesetzt werden, um den Text zu posi¬ 
tionieren. 

Vor dem Einzeiler sollten diese Zeilen eingegeben wer¬ 
den, um das Programm zu testen und die Funktion zu ver¬ 
stehen. 

1 A=53270 

2 L=10 :REM ANZAHL DER ZEICHEN DIE ERSCHEINEN 
SOLLEN 

3 A$= "DIESES DEMO ZEIGT, WIE MAN DAS PROGRAMM 
IN EIGENE EINBINDEN KANN" 

Das Programm: 

5 FOR R=1 TO LEN(A$):F0R 1=207 TO 200 STEP-1:PRINT 
" HOME "MID$(A$,R,L).:POKE A,I:NEXT 


Computerorgel 


Soft-Scrolling 


Dieser Einzeiler ist unseres Wissens das kürzeste Heim¬ 
computerorgelprogramm der Welt. Daß dies nicht in Basic 
möglich ist, allein schon wegen der Programmlänge, wird 
wohl jedem einleuchten. Der Einzeiler ist 86 Basic-Byte 
lang und erzeugt ein Maschinenspracheprogramm von 45 
Byte. Davon werden 14 Byte für Grafik-Effekte und 3 Byte 
für eine Programmende-Abfrage genutzt. 

MICROSOUND wird mit RUN gestartet und mit INST/ 
DEL beendet. Es können ohne weiteres Basic-Zeilen ange¬ 
fügt werden, die dann nach INST/DEL abgearbeittet wer¬ 
den. Alle Tasten, außer CTRL, COMM., SHIFT und RESTO- 
RE sind mit Noten belegt, die überwiegend so angeordnet 
sind, daß die linken Tasten tiefere Töne spielen als die rech¬ 
ten. Die Funktions- und Cursor-Tasten sind Bässe. 

Tips zur Eingabe dieses Programms: 

1. Schalten Sie vor der Eingabe durch SHIFT/COMM. auf 
Kleinschrift. 

2. Verwenden Sie bei der Eingabe des Programms die 
bereits erwähnten Befehlsabkürzungen. 

3. SPACEs bitte eingeben, ohne CBM- oder SHIFT-Ta- 
sten zu drücken. 

4. Achten Sie genau auf Groß- und Kleinschreibung! Das 
Programm kann beim kleinsten Tippfehler abstürzen! 

10 REM**#MICR0S0UND*#* 

20 ANFANG=1024 

30 FOR X=0 TO 44:READ A:P0KE AN+X,A:NEXT 
40 SYS AN 

100 DATA 169,143,141,24,212,169,240,141,5,212,238 
110 DATA 32,208,160,16,140,4,212,206,32,208,165 
120 DATA 203,240,19,41,63,141,1,212,200,140,4 
130 DATA 212,173,18,208,205,18,208,214,240,246,96 


Mit diesem Einzeiler kann ein beliebiger Text von rechts 
nach links punktweise über den Bildschirm geschoben 
werden. Es wird also eine Laufschrift, wie man sie oft in 
Schaufenstern sieht, auf Ihrem Bildschirm erzeugt. 

Um das Programm zu verstehen, muß vorher geklärt wer¬ 
den, welche Aufgaben die wichtigsten Variabein haben. Mit 
»L« legen Sie fest, wie breit die Laufschrift ist. Dabei darf »L« 
nicht größer als die gesamte Bildschirmbreite (40 Zeichen) 
sein. In der Variable »A$« erwartet die Routine den zu zei¬ 


Zeilen löschen am Bildschirm 


Diese kleine Routine löscht bestimmte Zeilen auf dem Bild¬ 
schirm. Die Variable LN enthält die Zeilennummer (0 bis 
24), V gibt die Von-Zeile und B die Bis-Zeile an (gelöscht 
wird von bis). 

10 FOR LN=V TO B:P0KE 781,LN:SYS 59903:NEXT 
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C64 


Das Demoprogramm für den Einzeiler löscht die Zeilen 
10 bis 20. 

5 V = 10 : B = 20 

Raffinierte Variablenausgabe 


Diese Routine gibt einen vorher festgelegten Namen in 
dreieckiger Form auf dem Bildschirm aus. Legen Sie bitte 
vor dem Einzeiler fest, welcher Name ausgegeben werden 
soll, durch die Variable <>A$«. 

Als Beispiel tippen Sie bitte folgende Zeile ab. Es wird bei 
richtiger Eingabe der Name Peter ausgegeben, in den 
nächsten Zeilen wird der Name immer um einen Buchsta¬ 
ben verkürzt ausgegeben. 

1 A$="PETER" 

Der Einzeiler: 

2 F0RR=1T0L:PRINT TAB(20)MID$(A$,R,LEN(A$)): 
P0KEA;R:NEXTR 

Zweifarbiger Bildschirm 


Der folgende Einzeiler erzeugt einen zweifarbigen Bild¬ 
schirmhintergrund, der normalerweise nur von Maschinen¬ 
sprache aus möglich ist. Das Programm arbeitet aber mit 
einem Trick. Es wird schnell zwischen einem gelben und ei¬ 
nem grünen Bildschirmrand umgeschaltet, aber das Auge 
nimmt dies nicht wahr, weil es nur 15 Bilder in der Sekunde 
registriert. So sieht das Auge einen zweifarbigen Rand. 

1 POKE 53281,7::::::::::::::::::::P0KE53281,13:G0T010 
Wichtig ist dabei die richtige Anzahl an Doppelpunkten. 
Diese verzögern das Programm nämlich so, daß sich ein 
stehendes Bild ergibt. Ändern Sie ruhig einmal die Anzahl 
an Doppelpunkten und probieren Sie auch andere Farb¬ 
werte für die Zahlen 7 und 13 hinter den POKEs. 

Formatierte Zeilen 


Wenn Sie in Ihrem Programm nach der Zeilennummer 
mehrere Leerzeichen eingeben, werden sie nicht akzep¬ 
tiert, es wird nur ein SPACE zwischen Nummer und Basic- 
Befehl gezeichnet. Der folgende Einzeiler verändert den 
Editor des C64 derart, daß Leerzeichen, die direkt nach ei¬ 
ner Zeilennummer stehen, nicht ignoriert werden. Somit 
kann ein Basic-Listing noch während der Eingabe forma¬ 
tiert werden. 

1 FOR 1=131 TO 128 STEP-1:P0KE 1,234:NEXT 

Nun sind nach einer Zeilennummer beliebig viele Leer¬ 
zeichen erlaubt. Um das Programm zu starten, ist vor dem 
RUN ein SYS 58303 nötig, da das Programm sonst außer 
einem SYNTAX ERROR nichts mehr zustande bringt. 

Klavierzauber und Resettaste 


Zufallsgrafiken 


Mit diesem Einzeiler werden immer wieder neue Zufalls¬ 
grafiken auf dem Bildschirm aufgebaut. Das Listing lautet: 

1 B=INT(RND(1)#127):P0KE 53272,B.-G0T0 1 

Ohne Cursor 


Wenn man in einer INPUT-Anweisung den Cursor für über¬ 
flüssig hält, kann man ihn durch »POKE 788,123« ausschal¬ 
ten. Durch »POKE 788,49« kann er jederzeit wieder einge¬ 
schaltet werden. Das Beispiel-Listing zeigt, wie diese Ab¬ 
frage aussehen kann. 

1 POKE 788,123:INPUT"NAME";A$:POKE 788,49:PRINT A$ 

INPUT mit Komma 


Diese INPUT-Routine ersetzt den INPUT-Befehl. Sie er¬ 
laubt Komma, Doppelpunkt und Strichpunkt als zusätzli¬ 
che Satzzeichen bei der Eingabe. Sonst funktioniert sie ge¬ 
nauso wie der INPUT-Befehl. Die Routine übernimmt alle 
Zeichen der Tastatur, auch führende Leerzeichen (Leerzei¬ 
chen vor Beginn des Textes). 

Die Variable »AA« enthält die aktuelle Eingabe in ASCII- 
Code. »II« bildet die Laufvariable für Schleifen und »XX$« 
enthält den eingegebenen Text. 

Das »Herz« dieses Einzeilers ist die Eingaberoutine ab 
Adresse 42336. Diese schreibt alle 80 Zeichen einer Bild¬ 
schirmzeile in den Basic-Eingabepuffer, der bei Adresse 
512 bet;"-' it. Dann liest das Programm Zeichen für Zeichen 
den Eingabepuffer bis zur genannten Null und stellt daraus 
den String »XX$« zusammen. 

Erfolgt keine Eingabe, das heißt nur die RETURN-Taste 
wurde gedrückt, so wird die Routine mit »XX$=CHR$(32)« 
verlassen. In allen anderen Fällen enthält »XX$« alle sicht¬ 
baren, eingegebenen Zeichen (außer Steuerzeichen). 

1 SYS 42336:XX$="":FOR 11=512 T0 600:AA=PEEK(II): 

IF AA THEN XX$=XX$+CHR$ (AA): NEXT 

Bildschirmeffekt 


Drei interessante Bildschirm-Flimmer-Effekte: 

10 FOR 1=18 T0 30:POKE 53265,1:NEXT I:G0T0 10 

oder 

10 FOR 1=1 T0 255:POKE 53270,1:NEXT I:G0T0 10 

oder 

10 FOR 1=18 T0 30:POKE 53270,1:POKE 53265,1:NEXT 
I:GOTO10 

Hilfe bei »file not found« 


Tippen Sie folgendes ein: 

10 S=54272:P0KE S+1,110:POKE S+5,9:P0KE S+6,9:P0KE 
S+4,17:P0KE S+4,l6:RUN 

Man kann in vollkommen unregelmäßigen Abständen 
Klaviertöne hören! 

Übrigens: mit zwei POKEs kann man die Restore-Taste 
als Reset-Taster mißbrauchen. 

POKE 792,226:POKE 793,252 


Manchmal starrt man als stolzer Besitzer einer Floppy- 
Station auf den Bildschirm und die Fehlermeldung »file not 
found«. Besonders schlimm ist dies, wenn der Fehler in ei¬ 
nem Programm auftrat, man also nicht weiß, welches file 
denn nun nicht gefunden wurde. 

Kein Problem: Durch die Eingabe von »SYS 63123« (leicht 
zu merken) bringt der C64 die Meldung »SAVING...« und 
den zuletzt verwendeten File-Namen auf den Bildschirm. 
Sie können das leicht testen: Tippen Sie »LOAD”XYZ”,8« 
ein, (plus RETURN-Taste) und anschließend »SYS 63123«. 

(Fl. Küppersbusch/rf) 


Sie eignen sich auch als einfacher Programmschutz. 

132 
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TIPS & TRICKS 


Der Speicher-Express: Hypra-Save 


Hypra-Save speichert Ihre Programme 3- bis 5mal 
schneller. Dies ist eine große Erleichterung bei 
der Arbeit mit der Floppy 1541. 

E in großer Nachteil der Diskettenstation VC 1541 ist die 
durch den seriellen Bus und durch das DOSV2.6 be¬ 
dingte geringere Geschwindigkeit. Inzwischen gibt es 
Programme, die das Laden von Diskette beschleunigen, 
wie etwa »Fast-Load« aus diesem Sonderheft (Seite 134). 
Mit der hier vorgestellten Routine geht jetzt auch das Spei¬ 
chern von Programmen mit dem C64 wesentlich rascher. 

Hypra-Save ist 3- bis 5mal so schnell wie die Originalrou¬ 
tine. Es verträgt sich mit vielen anderen, auch professionel¬ 
len, Programmen und Basic-Erweiterungen. Zudem arbei¬ 
tet es auch mit der Floppy 1541c, die ja oftmals Probleme 
mit der Kompatibilität bereitet. Zur Bedienung von Hypra- 
Save sollten Sie folgendes beachten: die Eingabe muß mit 
dem MSE erfolgen. Nach dem Laden startet man das Pro¬ 
gramm mit RUN. Danach sollte man NEW eingeben, wenn 
man ein eigenes Programm schreiben will. 

Hypra-Save kann mit oder ohne Verify speichern. 

Gibt man vor dem Filenamen als erstes Zeichen einen 
Stern ein, so wird nicht verifiziert. Feststellbar an bis zu 
5mal schnelleren Speicherzeiten. Mit Verify ist Hypra-Save 
etwa 3mal schneller als die Original-SAVE-Routine. Wer ei¬ 
nen »25, WRITE ERROR« bisher nur aus der Literatur 
kennt, der kann getrost ohne Verify arbeiten. Selbstver¬ 
ständlich kann man weiterhin Programme überschreiben. 
Dann ist der Klammeraffe mit anzugeben. So überschreibt 
der Befehl SAVE " *@:name",8 ein File, ohne die auf Dis¬ 
kette geschriebenen Blöcke zu prüfen, also ohne Verify. Hat 


der Computer alle Daten gesendet, wird im Gegensatz zur 
Original-SAVE-Routine nicht gewartet, bis das Laufwerk 
die Datei geschlossen hat. Dies macht sich besonders 
beim Überschreiben von Programmen bemerkbar. Die 
Floppystation arbeitet noch, während der Computer sich 
längst zurückgemeldet hat. Man darf die Diskette selbstver¬ 
ständlich nicht vor dem Erlöschen der roten LED aus dem 
Laufwerk nehmen. 

Beim Speichern von Programmen mit dem Klammeraf¬ 
fen kommt die 1541 häufig ins »Schleudern«. Es kann pas¬ 
sieren, daß Programme nicht mehr geladen werden kön¬ 
nen. Löschen Sie daher ein Programm erst mit dem 
SCRATCH-Befehl und speichern Sie erst dann die neue 
Version. 

Anstelle von RUN/STOP dient bei Hypra-Save die RE- 
STORE-Taste zum Abbrechen. Allerdings wird die Pro¬ 
grammdatei dann nicht geschlossen und erscheint im Di¬ 
rectory mit einem Stern. Möchte man die nicht geschlosse¬ 
ne Datei löschen, so geht das nicht mit dem SCRATCH-, 
sondern nur mit dem VALIDATE-Befehl. Übrigens blinkt die 
rote LED nach dem Drücken von RESTORE. Liest man 
dann den Fehlerkanal aus, so erhält man die Meldung »51, 
OVERFLOW IN RECORD«, gefolgt von Track und Sektor 
des letzten Blocks. Diese Fehlermeldung weist sonst auf ei¬ 
nen Übertragungsfehler hin, der von zu vielen Geräten am 
seriellen Bus herrühren kann. 

Sollte man eine merkwürdige Fehlernummer wie zum 
Beispiel 61 oder 71 erhalten, hilft meist nur ein Aus- und 
Einschalten der Floppy. Nach RUN/STOP-RESTORE oder 
nach ;inem Reset ist der SAVE-Vektor zurückgesetzt. 
Hypra-Save läßt sich dann mit SYS 365 wieder aktivieren. 

(Martin Pfost/sk) 
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4a 

8d 

00 

ee 

0bc9 

00 

85 

30 

85 

33 

85 

2e 

85 

6c 

0921 

: a2 

05 

a5 

ba 

20 

Oc 

ed 

a9 

74 

0a79 

dd 

8a 

66 

95 

6a 

66 

95 

6a 

ed 

Obdl 

36 

85 

Oc 

85 

50 

a9 

bb 

85 

ca 

0929 

: 6f 

20 

b9 

ed 

aO 

fd 

b9 

15 

df 

0a81 

4a 

4a 

8d 

00 

dd 

8a 

66 

95 

4b 

0bd9 

34 

bd 

31 

04 

85 

2f 

20 

e9 

df 

0931 

: cl 

20 

dd 

ed 

c8 

dO 

f 7 

a5 

76 

0a89 

6a 

66 

95 

6a 

4a 

4a 

8d 

00 

06 

Obel 

f 5 

85 

3a 

bd 

32 

04 

20 

a3 

ea 

0939 

: 14 

20 

dd 

ed 

a5 

15 

20 

dd 

d2 

0a91 

dd 

ea 

ea 

ea 

a9 

00 

8d 

00 

cc 

0be9 

f 7 

a6 

32 

b5 

83 

fO 

52 

20 

cO 

0941 

: ed 

a9 

le 

20 

dd 

ed 

aO 

00 

5e 

0a99 

dd 

c8 

dO 

aa 

60 

aO 

00 

98 

aO 

Obf 1 

2e 

04 

ad 

00 

lc 

29 

10 

dO 

7a 


iütai* 
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Obf 9 

03 

4c 

81 

f 5 

20 

10 

f 5 

a2 

el 

OcOl 

09 

50 

fe 

b8 

ca 

dO 

fa 

a9 

7b 

0c09 

ff 

8d 

03 

lc 

ad 

Oc 

lc 

29 

11 

Ocll 

lf 

09 

cO 

8d 

Oc 

lc 

a9 

ff 

df 

0cl9 

a2 

05 

8d 

01 

lo 

b8 

50 

fe 

88 

0c21 

b8 

ca 

dO 

fa 

aO 

bb 

bl 

Oc 

98 

0c29 

50 

fe 

b8 

8d 

01 

lc 

c8 

dO 

8e 

0c31 

f 5 

bl 

30 

50 

fe 

b8 

8d 

01 

03 

Oc39 

lc 

c8 

dO 

f 5 

SO 

fe 

4c 

00 

da 

0c41 

fe 

60 

86 

32 

2c 

24 

04 

86 

58 

0c49 

98 

b5 

83 

fO 

f 4 

20 

2e 

04 

cc 

0c51 

20 

Oa 

f 5 

aO 

bb 

bl 

Oc 

50 

22 

0c59 

fe 

b8 

4d 

01 

lc 

dO 

19 

c8 

65 

0c61 

dO 

f 3 

bl 

30 

50 

fe 

b8 

4d 

18 

0c69 

01 

lc 

dO 

Oc 

c8 

cO 

fd 

dO 

5a 

0c71 

fl 

u6 

32 

a9 

00 

95 

83 

60 

f 3 


0c79 : 4c c5 f6 bd 31 04 85 31 c9 
0c81 : bd 32 04 85 Od 60 05 01 f3 
0c89 : 06 04 58 20 19 fl a9 84 7c 
0c91 : d5 a7 fO 05 95 a7 20 42 b2 
0c99 : dO a9 40 8d f9 02 ä9 01 58 
Ocal : 85 83 20 07 dl 90 03 4c 17 
0ca9 : f8 cf 20 3e de f6 b5 a9 28 
Ocbl : 00 85 8b 85 8d a9 80 85 3b 
0cb9 : 8c a5 80 85 06 a9 eO 85 25 
Occl : 00 a5 00 30 fc fO 24 c9 15 
Occ9 : 01 fO ea a5 18 85 06 a5 c3 
Ocdl : 19 85 07 a2 00 a9 bO 20 13 
0cd9 : 7d d5 20 99 d5 a9 e2 20 f3 
Ocel : 7d d5 20 99 d5 a5 8c dO e2 
0ce9 : cc fO ae 4c 23 db aO cO 80 
Ocfl : a2 d6 20 6a d4 aO dO a2 2f 


0cf9 : 

: cO 

20 

6a 

d4 

20 

00 

cO 

48 

94 

OdOl : 

aO 

d6 

a2 

cO 

20 

6a 

d4 

88 

46 

0d09 : 

60 

ad 

f a 

ff 

48 

ad 

fb 

ff 

eO 

0dl 1 : 

48 

a9 

fb 

8d 

fa 

ff 

a9 

d3 

de 

0dl9 : 

8d 

fb 

ff 

84 

ad 

86 

15 

aO 

d9 

0d21 : 

00 

84 

ac 

84 

14 

a2 

06 

bl 

fl 

0d29 : 

: ac 

91 

14 

c8 

dO 

f 9 

e6 

ad 

90 

0d31 : 

e6 

15 

ca 

dO 

f2 

68 

8d 

fb 

Of 

0d39 : 

ff 

68 

8<i 

fa 

ff 

60 

52 

20 

bb 

Listing zu 

»Hypra-Save«. 




Beachten Sie bitte die Eingabe- 


hinweise auf Seite 158. 





Fastload — die Floppy gibt Gas 


Die langen Wartezeiten beim Laden von Program¬ 
men sind vorbei. »Fastload« ermöglicht bis zu 
fünffache Ladegeschwindigkeit und benötigt da¬ 
bei nur knapp ein halbes KByte Speicher. 

U m in den Genuß der Vorzüge von Fastload zu kom¬ 
men, müssen Sie nur Listing 1 mit dem MSE abtippen 
(Eingabehinweise auf Seite 158) und speichern. Es 
arbeitet sowohl mit der Floppy 1541, als auch mit der neuen 
1541c zusammen. Nach dem Laden wird Fastload einfach 
mit »RUN« gestartet. Ab diesem Zeitpunkt werden alle La¬ 
deoperationen nur noch mit der Geräteadresse 8 (für Flop¬ 
py) durchgeführt - auch bei einer davon abweichenden An¬ 
gabe. Wenn man nicht gerade eine andere als die standard¬ 
mäßig eingestellte Sekundäradresse (beispielsweise »0« 
beim Standardbetriebssystem oder »1« bei Speeddos) ver¬ 
wenden möchte, braucht man außer dem Namen somit kei¬ 
ne weiteren Parameter anzugeben. Das Format beim La¬ 
den ist also: 

LOAD "Name" (RETURN) 

Durch die Kürze von Fastload ist es möglich, damit mehr 
als 63 KByte lange Programme zu laden. Das letzte Byte 
der Fastloadroutinen befindet sich dabei in Speicherstelle 
$02f0, daran anschließend kann das zu ladende Programm 
beginnen. Es ist jedoch zu beachten, daß die BASIC- und 
Systemvektoren noch dahinter liegen ($0300 bis $0333) 
und nur bedingt überschrieben werden dürfen. Fastload 
liest und überträgt zwei Blöcke pro Diskettenumdrehung 
und ist somit etwa fünfmal schneller als die Standardbe¬ 
triebssystemroutinen. Tritt während des Ladevorganges 


ein Fehler auf, so wird der Fehlerkanal der Floppy ausgele¬ 
sen und die entsprechende Meldung auf dem Bildschirm 
ausgegeben. 

Soll Fastload über mehrere Ladevorgänge hinweg aktiv 
bleiben, dürfen neben den Speicherbereichen von $010b 
bis $01 b6 und $02a9 bis $02f0 auch $0334 bis $03fd und 
der »umgebogene« Loadvektor $0330/1, der nun auf $03b4 
zeigt, nicht verändert werden. Mittels < RUN/STOP 
RESTORE>, »SYS 64789« oder »SYS 65418« kann Fast¬ 
load abgeschaltet werden. Bei diesem Vorgang wird der 
Loadvektor $0330/1 wieder auf die Standardadresse 
($F4A5) gerichtet. 

Hintergrundinformationen 


Zur Beachtung: Fastload darf nur mit gesetzten Bits 0 und 
1 der Adresse $01 (Prozessor, I/O-Port; siehe Handbuch) 
aufgerufen werden. Dies ist aber der Normalfall, so auch 
beim Laden von Basic aus und dürfte keinerlei Probleme 
bereiten. Weiterhin dürfen keine Sprites angeschaltet sein 
(gegebenenfalls »0« in Speicherstelle 53269 POKEn.)Für 
die Anwendung von Fastload empfiehlt es sich, das Pro¬ 
gramm auf die am meisten benutzten Disketten zu kopie¬ 
ren, um es ständig zur Verfügung zu haben. Aufgrund des 
geringen Platzbedarfes von nur zwei Blocks dürfte dies in 
den meisten Fällen machbar sein. Interessierte finden den 
dokumentierten Assembler-Quellcode von Fastload sowie 
eine detaillierte Beschreibung des Programms auf der 
Programmservice-Diskette zu diesem Sonderheft. 

(Peter Arndt/Martin Jobst/sk) 


Name : faatload 0801 09fl 


0801 

: Ob 

08 

c3 

07 

9e 

32 

30 

36 

8b 

0809 

: 31 

00 

00 

00 

a2 

ce 

bd 

2e 

2o 

0811 

: OB 

9d 

2f 

03 

ca 

dO 

f 7 

a2 

6c 

0819 

: ac 

bd 

fc 

08 

9d 

Oa 

Ql 

ca 

a8 

0821 

: dO 

f 7 

a2 

48 

bd 

a8 

09 

9d 

lf 

0829 

: a8 

02 

ca 

dO 

f 7 

60 

b4 

03 

fa 

0831 

: ed 

f 5 

e6 

31 

4c 

dl 

f 4 

20 

60 

0839 

: 5b 

03 

a5 

00 

4c 

Oa 

e6 

a& 

7b 

0841 

: f 9 

Oa 

aa 

b5 

06 

85 

06 

b5 

bl 

0849 

: 07 

a2 

00 

85 

07 

a9 

eO 

85 

9e 

0851 

: 00 

8d 

5b 

02 

8d 

98 

02 

58 

85 

0859 

: 20 

99 

d5 

78 

c9 

02 

bO 

d7 

e9 

0861 

: ad 

00 

04 

fO 

15 

85 

06 

20 

03 

0869 

: 59 

03 

aO 

02 

b9 

00 

04 

20 

98 

0871 

: 59 

03 

c8 

dO 

f7 

ad 

01 

04 

91 

0879 

: 10 

dl 

aO 

ff 

c8 

b9 

00 

04 

fc 

0881 

: 20 

59 

03 

cc 

01 

04 

dO 

f4 

06 

0889 

: 4c 

94 

cl 

49 

ff 

85 

lb 

a9 

a5 

0891 

: 08 

8d 

00 

18 

a9 

01 

2c 

00 

b6 

0899 

: 18 

fO 

fb 

a2 

04 

a9 

00 

46 

97 


08al 

lb 

2a 

Oa 

46 

lb 

2a 

Oa 

8d 

63 

08a9 

00 

18 

ca 

dO 

fO 

ea 

8e 

00 

23 

08bl 

18 

60 

aB 

fO 

03 

4c 

a5 

f 4 

55 

08b9 

aa 

bl 

bb 

49 

24 

fO 

f 6 

a9 

4d 

OBcl 

08 

85 

ba 

a5 

b9 

85 

a7 

86 

63 

08c9 

b9 

20 

d9 

f 3 

20 

6d 

01 

8e 

16 

08dl 

11 

dO 

20 

a9 

02 

a9 

57 

20 

93 

08d9 

dd 

ed 

8a 

20 

dd 

ed 

a9 

03 

4d 

08el 

20 

dd 

ed 

a9 

20 

a8 

20 

dd 

24 

08e9 

ed 

bd 

34 

03 

20 

dd 

ed 

e8 

9d 

08f 1 

88 

dO 

f6 

20 

fe 

ed 

8a 

10 

4d 

08f9 

d9 

4c 

Ob 

01 

20 

a9 

02 

a9 

86 

0901 

45 

20 

dd 

ed 

a9 

Od 

20 

dd 

cb 

0909 

ed 

a9 

03 

20 

dd 

ed 

20 

fe 

5b 

0911 

ed 

78 

20 

cc 

02 

30 

44 

48 

lf 

0919 

dO 

08 

20 

cc 

02 

38 

e9 

03 

lf 

0921 

85 

b6 

20 

cc 

02 

a8 

20 

cc 

22 

0929 

02 

a6 

a7 

dO 

04 

a4 

c3 

a5 

42 

0931 

c4 

84 

ae 

85 

af 

68 

fO 

53 

3c 

0939 

aO 

04 

84 

b6 

38 

a5 

ae 

e5 

Oa 

0941 

b6 

85 

ae 

bO 

02 

c6 

af 

20 

dl 

0949 

cc 

02 

20 

cS 

02 

c8 

dO 

n 

71 

0951 

e6 

af 

aO 

02 

20 

cc 

02 

fO 

ca 


0959 

2b 

10 

df 

20 

bd 

02 

a9 

08 

2b 

0961 

20 

09 

ed 

a9 

6f 

20 

c7 

ed 

a9 

0969 

20 

13 

ee 

c9 

30 

ro 

14 

a2 

28 

0971 

00 

86 

90 

20 

16 

e7 

20 

13 

24 

0979 

ee 

24 

90 

50 

f 6 

68 

68 

20 

3c 

0981 

ef 

ed 

38 

60 

20 

cc 

02 

aa 

47 

0989 

ca 

86 

b6 

aO 

00 

20 

cc 

02 

90 

0991 

20 

c5 

02 

c8 

c4 

b6 

dO 

f 5 

5f 

0999 

98 

18 

65 

ae 

85 

ae 

90 

02 

81 

09al 

e6 

af 

20 

bd 

02 

4c 

a9 

f 5 

34 

09a9 

a9 

08 

20 

Oc 

ed 

a9 

6f 

20 

Oa 

09bl 

b9 

ed 

a9 

4d 

20 

dd 

ed 

a9 

71 

09b9 

2d 

4c 

dd 

ed 

a9 

lb 

8d 

11 

Od 

09cl 

dO 

4c 

46 

f6 

e6 

01 

91 

ae 

42 

09c9 

c6 

01 

60 

2c 

00 

dd 

70 

fb 

56 

09dl 

a9 

67 

8d 

00 

dd 

a2 

06 

e8 

6e 

09d9 

8e 

00 

dd 

ca 

dO 

fd 

a2 

04 

c7 

09el 

ad 

00 

dd 

Oa 

2a 

66 

a6 

4a 

4c 

09e9 

66 

a6 

ca 

dO 

f 3 

a5 

a6 

60 

37 


Listing 1. Der Floppyspeeder »Fast¬ 
load«. Bitte mit dem MSE eingeben. 
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TIPS & TRICKS 


Synthetische Steuerzeichen 


Mit den »synthetischen Steuerzeichen« stehen 
Ihnen Möglichkeiten offen, die Sie bisher nicht für 
möglich gehalten haben: beispielsweise ein neu¬ 
artiger Listschutz, Grafik und Breitschrift-/ 
Schmalschrift-Wechsel im Listing. 

N ach dem Einschalten desC64 und dem Erscheinen 
der »READY«-Meldung kann man sich nach Herzens¬ 
lust auf dem Bildschirm austoben - zunächst ohne 
Programm. Sie können vorab Texte gestalten, Grafiken ent¬ 
werfen, dabei die Farben wechseln, hier Zeichen ergänzen 
und da Stellen abändern. Komfortabel wird dieses Auste¬ 
sten der Möglichkeiten auf der »elektronischen Tafel« je¬ 
doch erst durch die Cursortasten <CLR/HOME>, <INST/ 
DEL>, <CTRL9> (REVERSEON), <CTRL0> (REVER¬ 
SE OFF) sowie durch die Farbwahltasten. Man erreicht da¬ 
mit ein hohes Maß an Flexibilität im Ansteuern jeder beliebi¬ 
gen Bildschirmstelle. 

Schreibt man nun unversehens ein Anführungszeichen 
(engl.: quote) auf den Schirm, so verhält sich der Computer 
plötzlich anders: die Cursor-Tasten wirken nicht mehr - 
man kommt mit ihnen nicht mehr aus der Zeile heraus. 
Auch die Farbumschaltung mißlingt, das Bildschirmlö¬ 
schen mit <CLR/HOME> versagt, lediglich <DEL> 
funktioniert noch. Und dies alles in voller Absicht! Warum? 
Statt der Ausführung der Steuerbefehle zieht es der Com- 
putervor, sich die Anweisungen in Form reverser Steuerzei¬ 
chen zu »merken«. Wozu? Nun, um Steuerbefehle dieser 
Art programmierbarzu machen. (Man stelle sich nureinmal 
vor, der Cursor sei nicht per Software steuerbar.) Nach dem 
ersten Anführungszeichen befindet sich der Computer of¬ 
fenbar in einem anderen Verarbeitungsmodus, genannt 
Quote-Modus, in dem er(mit Ausnahme von <DEL>)alle 
Steuerbefehle als Reverszeichen »speichert« und damit 
zur späteren Ausführung bereitstellt. Der Quote-Modus 
wird verlassen, sobald das zweite Anführungszeichen ein¬ 
getippt oder die RETURN-Taste betätigt wird. Da die Steu¬ 
erzeichen - eingeschachtelt in Gänsefüßchen - vom Com¬ 
puter wie Texte behandelt werden, können sie in Program¬ 
men auch als solche verarbeitet werden. Dazu stehen alle 
Stringoperationen zur Verfügung, die auch bei »normalen« 
Texten verwendet werden. Wirkung zeigen Steuerzeichen 
jedoch erst dann, wenn man sie mittels PRINT aktiviert. Fa¬ 
zit: Ein Basic-Listing kann normalerweise keine reversen 
Zeichen enthalten - es sei denn, es handelt sich um Steuer¬ 
zeichen in Strings. 

Steuerbefehle ohne »Gänsefüßchen« 


Wir haben uns als Commodore-Anwender schon längst an 
das reverse »Q« für cCURSOR UP> oder an das Herz¬ 
chen für <CLR/HOME> gewöhnt. Doch es geht auch 
anders. Das muß es auch, wenn der Drucker zum Beispiel 
keine Steuerzeichen ausgeben kann. In diesem Fall be¬ 
dient man sich der CHR$-Funktion, die durch die Befehls¬ 
folge 

PRINT CHR$(X) 

aktiviert wird. Mit X = 147 wird beispielsweise ebenfalls der 
Bildschirm gelöscht. Wie kommt das? Tippen Sie bitte ein: 

PRINT ASC ( " (CLR/HOME]" ") 

Bitte tippen Sie die Ausdrücke, die in den geschweiften 
Klammern stehen, nicht als Buchstabenfolge ein, sondern 
zum Beispiel für PRINT ASC ("(CLR/HOME]") nach dem 


ersten Gänsefüßchen die Control-Taste und dann gleich¬ 
zeitig die CLR/HOME-Taste. Verfahren Sie bei den folgen¬ 
den Beispielen dementsprechend. 

Nach erfolgtem < RETURN > lesen Sie: 147. Das rever¬ 
se Herzchen wird vom Computer also als Zeichen interpre¬ 
tiert, das den ASCII- beziehungsweise CHR$-Code 147 
trägt. Ein weiteres Beispiel: Die Zeilen 
PRINT "(CTRL 9]TEST" 
und 

PRINT CHR$(18)"TEST" 
bewirken dasselbe, weil 

PRINT ASC( " (CTRL 9)") 

zeigt, daß der CHR$-Code des reversen »R« eben 18 ist. 

Ausgehend von der Tatsache, daß jedem Steuerzeichen 
ein bestimmter Code in der CHR$-Liste (siehe Handbuch) 
zugeordnet ist, wurde die Idee geboren, daß diese Zuord¬ 
nung - um es mathematisch auszudrücken - umkehrbar 
eindeutig sein müsse. Das heißt, zu jedem Steuerbefehl 
müßte auch ein entsprechendes reverses Steuerzeichen 
gehören, das denselben Zweck erfüllt. 

Nun gibt es zum Beispiel die Möglichkeit, über 
PRINT CHR$(14) 

auf Kleinbuchstaben umzuschalten. Gibt es dafür auch ein 
Steuerzeichen? Auf konventionellem Weg hieße die Ant¬ 
wort klipp und klar: nein. Aber... 

Zu Beginn war alles nur Spielerei, bis sich die erstaunli¬ 
chen Möglichkeiten und Anwendungen häuften. Deshalb: 
spielen Sie nun bitte mit bei den folgenden Tricks. 

Steuerzeichen auf illegalem Weg 


Bevor wir das große Geheimnis lüften, wollen wir erst ein¬ 
mal an ganz und gar legalen Steuerzeichen üben, wie man 
sie illegal eingibt. Halten Sie sich bitte zunächst streng an 
das angegebene Rezept, auch wenn es noch andere Ein¬ 
gabeformen gibt. Das gilt auch für die späteren Beispiele. 
Unsere erste Übung soll darin bestehen, den Bildschirm 
ohne CHR$(147) und ohne die Taste < CLR/HOME > zu lö¬ 
schen - im Direktmodus, versteht sich. Dazu geben Sie bit¬ 
te hintereinander in einer Zeile ein: 

1. Schritt: 

PRINT 

2. Schritt: 

Erstes Anführungszeichen setzen. Jetzt befinden wir 
uns im Quote-Modus, den wir sofort wieder verlassen 
wollen. Daher: 

3. Schritt: 

Zweites Anführungszeichen setzen. 

4. Schritt: 

Mit <DEL> eine Stelle zurückgehen. Dabei wird das 
zweite Anführungszeichen gelöscht. Da wir uns nicht 
mehr im Quote-Modus befinden, reagiert der Computer 
auf Steuerbefehle. 

5. Schritt: 

Mit <CTRL 9> (RVS ON) auf Revers-Modus schalten. 
Das ist notwendig, da wir ja ein reverses Steuerzeichen 
quasi künstlich erzeugen wollen! 

6. Schritt: 

<SHIFT S> eingeben. Beim geSHIFTeten »S« bekom¬ 
men wir eines der S-Taste zugeordneten Grafikzeichen, 
in diesem Fall das gewünschte Herzchen. Nun verlassen 
wir den Revers-Modus: 

7. Schritt: 

<CTRL 0> (RVS OFF). Wenn Sie wollen, können Sie 
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Steuerzeichen CHRS-Code Wirkung 

H 8 Die manuelle Umschaltung 

zwischen Groß- und Kleinbuch¬ 
staben mit Hilfe der COMMO- 
DORE- und SHIFT-Tasten wird 
gesperrt. 

I 9 Die obige Sperre wird wieder 

gelöst. 

M 13 RETURN. Alles, was nach dem 

reversen M in der Zeile steht, 
wird nicht mehr gedruckt. Lei¬ 
der ist eine echte Simulation 
der RETURN-Taste zum Ändern 
von Basic-Zeilen unter Pro¬ 
grammkontrolle nicht möglich. 

N 14 Umschalten auf Kleinbuch¬ 

staben. 

T 20 DEL. Hiermit können Sie Teile 

oder komplette Programmzeilen 

Steuerzeichen CHRS-Code Wirkung 

optisch verschwinden lassen. 
Dieses Steuerzeichen wirkt 
auch beim Listen eines Pro¬ 
gramms auf dem Schirm. 
Anwendung: partieller 
Listschutz. 

SHIFT M 141 SHIFT RETURN. Das Super- 

Zeichen! Mehr dazu im Text. 

SHIFT N 142 Umschalten auf Großbuch¬ 

staben. 

SHIFT T 148 INS. Kann zum Ändern von Text 

an bereits gedrucktem Text 
benutzt werden. Beispiel: ? 
"[SHIFT T)X” liefert ein »X« auf 
dem Schirm. Bei mehrfacher 
Abarbeitung wird stets ein 
weiteres »X« an die bereits vor¬ 
handenen angehängt. 


Tabelle 1. Steuerzeichen und ihre Wirkung 

noch ein Anführungszeichen zur optischen Abrundung 

anhängen. 

Was jetzt auf dem Bildschirm steht, sieht so aus, als hät¬ 
ten wir nie den legalen Pfad verlassen, als hätten wir immer 
mit der CLR/HOME-Taste gearbeitet. Dieses Steuerzei¬ 
chen ist jedoch künstlich entstanden - wird es auch wirken 
wie ein »echtes«? Das Drücken der RETURN-Taste über¬ 
zeugt uns schnell davon, daß der Computer uns diese um¬ 
ständliche Manipulation nicht übelgenommen hat: es funk¬ 
tioniert tatsächlich! 

Bedenken Sie bei der Eingabe, daß nur zwei Anführungs¬ 
zeichen auf dem Schirm erscheinen, obwohl insgesamt 
drei eingegeben wurden. Der Computer befindet sich also 
nach dem dritten Gänsefüßchen wieder im Quote-Modus. 

An der Stelle, an der soeben mit < SHIFT S > das Steu¬ 
erzeichen für <CLR/HOME> generiert wurde, kann nun 
jedes beliebige reverse Zeichen erzeugt werden. Diejeni¬ 
gen davon, die auch eine Steuerfunktion ausüben, aber 
nicht auf normalem Wege über direkte Tastendrücke er¬ 
zeugt werden können, wollen wir »synthetische Steuerzei¬ 
chen« nennen. Und nun folgen nützliche Beispiele mit die¬ 
sen Steuerzeichen. 

Wenn es - und das war die Frage, die alles ins Rollen 
brachte - anstelle der Umschaltung auf Kleinbuchstaben 
mit CHR$(14) ein äquivalentes Steuerzeichen gibt, dann 
muß es zwischen dem reversen »E« für <CTRL 2> 


(WHITE; Code 5) und dem reversen »Q« für <CURSOR 
DOWN > (Code 17) zu suchen sein. Numeriert man das Al¬ 
phabet entsprechend durch, so findet man den Buchsta¬ 
ben »N« unter der Codezahl 14. Das reverse »N« müßte 
demnach das Steuerzeichen für die Umschaltung auf 
Kleinbuchstaben sein. Probieren wir es aus: 

PRINT ''"[DEL] (CTRL 9]N(CTRL 0]"(<RETURN> 

Es klappt! Der Computer schluckt diesen ungewöhnli¬ 
chen Befehl und führt ihn aus. 

Dieser Erfolg motivierte eine Suche nach allen verfügba¬ 
ren synthetischen Steuerzeichen; die Ausbeute fiel jedoch 
zunächst recht mager aus. Die nebenstehende Tabelle 1 
zeigt Ihnen die synthetischen Zeichen und ihre Wirkungen 
bei Bildschirmausgaben (beim Drucker sieht’s etwas an¬ 
ders aus - dazu aber später mehr). 

Die Zeichen dieser Tabelle müssen als reverse Zeichen 
wie oben erzeugt werden (Ausnahmen: <T> für < DEL> 
und <SHIFT T> für <INS>). 

Auch wenn die Eingabe der synthetischen Steuerzei¬ 
chen umständlich erscheint, man wird sich schnell daran 
gewöhnt haben und auf ihre Vorteile nicht mehr verzichten 
wollen - nicht nur, weil sie gegenüber der CHR$-Funktion 
Speicherplatz sparen. 

So unscheinbar und unwichtig das < SHIFT RETURN > 
ist, so gewaltig sind die Möglichkeiten, die uns das zugehö¬ 
rige synthetische Steuerzeichen eröffnet. Es handelt sich 
um das reverse, geshiftete M (Code 141). 

Das Super-Steuerzeichen 


Gibt man 

10 ? " "(DEL) TEST (CTRL 9] (SHIFT M] (CTRL0) LAUF" 

ein, so <.c : gt sich nach dem Drücken der RETURN-Taste, 
daß der Computer nach dem Teilstring »TEST« einen Wa¬ 
genrücklauf (carriage return) mit Zeilenvorschub (line feed) 
durchführt und »LAUF« direkt darunter ausgibt. Genau die¬ 
ses Verhalten erwartet man von SHIFT RETURN. (SHIFT M) 
kann jedoch mehr - viel mehr! Das nächste Beispiel soll es 
beweisen: 

10 ? ""(DELjTESTfCRTL 9]_(SHIFT M)R( CRTL 0]LAUF" 

Geben Sie bitte dieses einzeilige Programm ein und star¬ 
ten Sie es mit RUN. Wie erwartet erscheint »TEST« und dar¬ 
unter revers »LAUF«. Nun listen Sie bitte dieses Programm. 
Erstaunt? Das ist tatsächlich neu! Das Steuerzeichen für 
die Umschaltung in den Revers-Modus erscheint nicht im 
Listing, sondern wird entgegen aller bisherigen Kenntnisse 
ausgeführt. »LAUF« wird im Listing revers ausgegeben. 
Durch das SHIFTRETURN-Zeichen wird der Basic-Inter- 
preter offenbar veranlaßt, nachgestellte Steuerzeichen 
auch im Listing wirksam werden zu lassen. Es zeigt sich, 
daß diese Schlüsselfunktion alle Steuerbefehle, seien es 
Farbumschaltungen oder Cursor-Bewegungen, aktiviert. 
Ungeahnte Möglichkeiten eröffnen sich nun zur optischen 
Aufbereitung, das heißt Strukturierung und Gestaltung von 
Listings auf dem Bildschirm. Einige Beispiele sollen dies 
verdeutlichen. 

Beispiel 1: 

Reverse REM-Zeile ohne sichtbares REM-Statement 
und ohne Zeilennummer 

10 REM ""[DEL] (CRTL 9] (SHIFT M] (SHIFT Q] R 
[CRTL0] TESTLAUF 
20 F0R 1=1 T0 10 
30 PRINT"TESTLAUF":NEXT 

Die Zeilen 20 und 30 sind Beiwerk, damit die REM-Zeile 
nicht so allein dasteht. Listen Sie das Programm bitte. Sie 
sehen die reverse Überschrift »TESTLAUF« ohne REM und 
ohne Zeilennummer und darunter wie gewohnt die Pro¬ 
grammzeilen 20 und 30. Wie funktioniert dieser Trick? Das 
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Steuerzeichen 

CHRS-Code 

Wirkung 

(H) 

8 

Umschaltung auf Grafik-Modus 

(J) 

10 

Zeilenvorschub 

fM) 

13 

RETURN. Nachfolgende Zeichen 
werden nicht mehr gedruckt. 

|N| 

14 

Umschaltung auf Breitschrift 

10! 

15 

Umschaltung auf normale 
Schriftbreite 

(P| 

16 

Festlegung der Druckstartposition 

*)[Q! 

17 

Umschaltung auf Kleinbuchstaben 

•)|R| 

18 

RVS ON 

!Z] 

26 

Zeichenwiederholung (Grafik) 

III 

27 

Punktadresse für Druckstart 

[SHIFT M! 

141 

SHIFT RETURN. Nachfolgende 
Zeichen werden in einer neuen 
Zeile gedruckt. 

')(SHIFT Q| 

145 

Umschaltung auf Großbuchstaben 

*)'SHIFT R] 

146 

RVS OFF 


Tabelle 2. Liste der Drucker-Steuerzeichen 


reverse [SHIFT M) bewirkt einen Sprung zum Anfang der 
nächsten Zeile und gibt die nachfolgenden Steuerzeichen 
zur Ausführung frei. Mit dem reversen (SHIFT Q] geht der 
Cursor eine Zeile nach oben, also auf »1« der Zeilennum¬ 
mer 10. Reverses R schaltet auf reverse Zeichen um, in de¬ 
nen dann der REM-Text »TESTLAUF« ausgegeben wird. 
Dabei überschreibt der Computer die Zeilennummer sowie 
das REM-Statement. Das alles vollzieht sich so schnell, 
daß es sich der Beobachtung entzieht. Der Anwender sieht 
nur noch die reverse Überschrift und kann demzufolge an 
dieser Zeile auch nichts mehr ändern. 

Sollten Sie die Original-REM-Zeile noch auf dem Bild¬ 
schirm haben, so hängen Sie an das »F« von »TESTLAUF« 
noch das Steuerzeichen für <CURSOR DOWN> an. Sie 
werden sehen, daß beim Listen sogar eine Leerzeile zwi¬ 
schen Überschrift und Programm entsteht. Selbstverständ¬ 
lich können derartige REM-Zeilen beliebig im Programm 
verstreut sein. Nun einige Erläuterungen zu den Beispiel¬ 
programmen in Bild 2 bis 4: 

Beispiel 2. Farbige REM-Zeile (ändern Sie nur Zeile 10). 
Beispiel 3. Wirkung: Die bekannten Herzchen sorgen 
nach dem Listen jeder Zeile für ein Löschen des Bild¬ 
schirms, so daß die beiden Programmzeilen weder einzeln 
noch insgesamt sichtbar bleiben und die Codezahlen A 
und B dem Anwender vorenthalten werden. 

Beispiel 4. Wirkung: Grüne Überschrift ohne Zeilennum¬ 
mer und ohne REM, gelbes Listing. 

Beispiel 2: 

Farbige REM-Zeile 

10 REM" * (DEL] [CRTL9j (SHIFT M] [SHIFT Qj (fj 
(CRTL 0) TESTLAUF (CRTL9j [SHIFT tt] 

(CRTL 0] 

Beispiel 3: 

Listschutz 

10 A=4711 : REM" "(DEL] [CRTL9] [SHIFT M) 

[SHIFT S] 


"TEST |H| ISHIFT H| jSHIF MINUS] 

ISHIFT T| 

[SHIFT] 

ISHIFTJ 


8 

136 156 

148 

148 

148 


ISHIFT T] 

ISHIFT T] ISHIFT MINUS! 

ISHIFT H| 

ISHIF •] 

|SHIF *] 

(OjLAUF " 

148 

148 156 

136 

128 

128 

15 


Tabelle 3. Aus dem Beispiel in Bild 2 ergeben sich 
diese Charakterstring-Codes 


20 B=0815 : REM ""[DEL] (CRTL9) (SHIFT Mj 
(SHIFT S] 

reverses <SHIFT M> für <SHIFT RETURN > 
reverses < SHIFT S> für <CRL/HOME> 

Beispiel 4: 

REM-Ersatz 

10 PRINT" "[DEL] [CRTL9] [SHIFT M] (SHIFT S)R 
[CRTL9] QUADRATZAHLEN 

reverses <SHIFT M> für <SHIFT RETURN > 
reverses < SHIFT S> für <CRL/HOME> 
reverses <R> für <RVS ON> 

20 F0R 1=1 T0 10 
30 PRINT 1,1*1 : NEXT 

_ Wirkung: Im Programmlauf werden unter der reversen 
Überschrift »Quadratzahlen« die Ergebnisse ausgegeben, 
während beim Listen des Programms der PRINT-Befehi 
verschwiegen wird und man eine REM-Zeile wie in Beispiel 
1 vermutet. Damit trägt eine PRINT-Zeile zur optischen 
Strukturierung eines Listings bei - ein Effekt, der bislang in 
dieser Form unmöglich schien. 

Sie werden sicherlich Spaß an der Vielseitigkeit dieser 
neuen Methode gewinnen und eine Vielzahl von Anwen¬ 
dungen austüfteln. 

Bisher wurde die Erzeugung synthetischer Steuerzei¬ 
chen und ihre Wirkung bei Bildschirmbetrieb dargestellt. 
Jetzt soll von neuen Möglichkeiten für Druckeranwender 
die Rede sein. Dabei wird auf den Drucker MPS 801 und 
Kompatible Bezug genommen, mit dem die Steuerzeichen 
ausgetestet wurden. Es ist nicht auszuschließen, daß der 
eine oder andere Druckertyp unterschiedlich reagieren 
wird. Die wichtigsten Steuerfunktionen dürften jedoch auf 
allen Geräten die gleichen Reaktionen hervorrufen. 

!» jckerlistings übersichtlicher gemacht 

Bevor es nun zur Sache geht, ein kurzer Abriß des vorange¬ 
gangenen Abschnitts: 

Zur Cursor-Steuerung, für <RVS ON/ÖFF> oder für 
Farbumschaltungen stehen dem C64-Anwender zwei 
Möglichkeiten zur Verfügung. Erstens kann die 
CHR$-Funktion genutzt werden (Beispiel: »?CHR$(19)« be¬ 
wirkt <HOME>), und zweitens erlauben reverse Steuer¬ 
zeichen eine direkte und kurze Eingabe der Steuerbefehle 
(Beispiel: das reverse »S« veranlaßt ebenfalls <HOME>). 
Nun existieren jedoch einige CHR$-Codes, für die äquiva¬ 
lente Steuerzeichen nicht über zugehörige Tasten abgeru¬ 
fen werden können. So schaltet CHR$(14) beispielsweise 
auf Kleinbuchstaben um. Mit Hilfe der ASC-Funktion zeigt 
sich, daß das reverse »N« den CHR$-Code 14 trägt. Damit 
kann dieses Zeichen ebenfalls zur Steuerung herangezo¬ 
gen werden. Da außer den konventionellen Steuerzeichen 
keinerlei reverse Symbole in Strings Vorkommen können, 
muß das reverse »N« quasi künstlich erzeugt werden (daher 
der Name »Synthetische Steuerzeichen«). Aber das ist kein 
Problem! Wir haben bereits ein Eingabeverfahren kennen¬ 
gelernt, das aber jetzt nicht wiederholt werden soll. Statt 
dessen soll ein anderes Verfahren gezeigt werden, das viel¬ 
leicht ein wenig übersichtlicher ist als das bereits beschrie¬ 
bene. 

Geben Sie die Programmzeile, die ein im String stehen¬ 
des Steuerzeichen erhalten soll, wie gewohnt ein. Reser¬ 
vieren Sie dabei jedoch mittels Space die Stelle im Text¬ 
string, wo später das synthetische Steuerzeichen stehen 
wird. Schließen Sie die Eingabe der Zeile mit Betätigung 
der Return-Taste ab. Nun können Sie ohne Schwierigkeiten 
den Cursor auf die bewußte Stelle bewegen, durch gleich¬ 
zeitiges Drücken von <CTRL> und <9> in den Revers- 
Mode schalten (es erscheint kein reverses R!) und schließ¬ 
lich den freigehaltenen Platz mit dem entsprechenden Re- 
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versezeichen belegen (in unserem Beispiel also mit dem 
reversen »N«), Die so ergänzte Programmzeile wird jetzt 
durch erneutes Drücken der Return-Taste verlassen. Fer¬ 
tig. Auf diese Weise lassen sich sowohl die altbekannten als 
auch die neuen Steuerzeichen leicht erzeugen und ent¬ 
sprechend ins Programm einfügen. In den weiteren Aus¬ 
führungen werden die synthetischen Steuerzeichen ver¬ 
einfachend in geschweiften Klammern dargestellt (zum 
Beispiel reverses N = (Nj). 

Die Drucker-»Syirthies« 


Nun zum eigentlichen Thema: Man könnte fast wetten, daß 
einige Druckerbesitzer unter unseren Lesern inzwischen 
beim Experimentieren mit synthetischen Steuerzeichen 
nicht schlecht gestaunt haben. Denn auch hier eröffnen 
sich neue Möglichkeiten, an die bislang nicht zu denken 
war. So sind zwar keine spektakulären Effekte in laufenden 
Programmen zu erzielen, dafür jedoch hat man erstmals 
die Möglichkeit, Druckerlistings zu manipulieren. Zuvor 
möchte ich Ihnen jedoch eine Liste der Steuerzeichen (Ta¬ 
belle 2) geben. Es ist zu beachten, daß die mit *) gekenn¬ 
zeichneten Steuerzeichen nicht zu den synthetischen zäh¬ 
len, da sich diese direkt über Tasten eingeben lassen. Sie 
wurden nur der Vollständigkeit halber mit in die Tabelle auf¬ 
genommen. 

Nun zu den Erläuterungen derjenigen Zeichen, die sinn¬ 
volle Anwendungen erlauben. 

Das reverse »H« gestattet die Umschaltung des Druckers in 
den Grafik-Modus. Alle nachfolgenden Zeichen im String 
werden - sofern ihr jeweiliger CHR$-Code größer als 127 ist 
- als Grafikinformationen interpretiert. In diesem Modus 
bleibt der Drucker so lange, bis er mit {Nj oder (Ql auf 
Schriftbetrieb zurückgeschaltet wird. Betrachten Sie bitte 
Beispiel 1. 

Zwischen »TEST« und »LAUF« befindet sich in Bild 1 ein 
selbstdefiniertes Grafikzeichen, das sowohl im Programm¬ 
lauf als auch im Listing ausgegeben wird. Auch wenn Sie 
es zunächst nicht glauben - Sie sehen ein Original-Listing 
und nicht etwa gePRINTete Textzeilen. Ich will Ihneh den 
Trick verraten. In einer Vergrößerung sieht das Grafiksym¬ 
bol aus wie im Bild 2 gezeigt. 

Die Umrechnung des dualen Bitmusters in Dezimalzah¬ 
len liefert diejenigen CHR$-Codes, durch die das Zeichen 
spaltenweise beim Drucken entsteht. Man muß also nur 
wiederum synthetische Zeichen finden, die die gesuchten 
CHR$-Codes tragen. (Tabelle 3) 

Mit dieser Folge von reversen Zeichen erzielen Sie also 
den Ausdruck, der im Bild 1 abgebildet ist. 

Folgt dem (Hj keine Grafikinformation, das heißt ist der 
CHR$-Code kleiner als 128, so kommt es zum Abbruch des 
Listings. Diese Tatsache kann man sich bewußt zunutze 
machen, wenn man ohne größeren Programmieraufwand 
einen Drucker-Listschutz in sein Programm einbauen will. 
Der Bildschirmbetrieb leidet darunter nicht, da [H] dort nur 
eine Verriegelung der Umschaltung zwischen Groß- und 
Kleinschrift bewirkt. 


Zeilenvorschub 


Die Beispiele in Bild 3 und 4 zeigen, daß [Jj einen Zeilenvor¬ 
schub mit Rückwagenlauf verursacht. In Bild 3 befindet 
sich das reverse J zwischen »TEST« und »LAUF«, bei Bild 4 
am Schluß des Strings. Da man das zweite Anführungszei¬ 
chen eines Strings weglassen kann, sofern keine weiteren 
Basic-Befehle mehr in dieser Zeile folgen sollen, ergibt sich 
so die Möglichkeit, echte Leerzeilen mit [J] im Listing (Bild 
3) zu erzeugen. 


Während (Nj beim Bildschirmbetrieb auf Kleinbuchstaben 
umschaltet, zeigt der Drucker eine andere Wirkung. Er wird 
veranlaßt, alle nachfolgenden Zeichen in doppelt breiter 
Schrift auszugeben. Es ist also bei der Anwendung von (N) 
Vorsicht geboten, da ein für den Bildschirm konzipiertes 
Programm beim Druckerlisting unerwünschte Steuerun¬ 
gen zur Folge haben kann. In diesen Fällen sollte man (Nj 
wieder durch den konventionellen Befehl CHR$ ersetzen. 

Wollen Sie jedoch die Breitschrift zur übersichtlichen Ge¬ 
staltung eines Listings nutzen, so können Sie ruhig das (Nj 
hier und da im Programm verstecken. Es bleibt demjeni¬ 
gen, der das Programm lesen soll, sowieso verborgen. 
Wenn nur eine Hervorhebung einzelner Worte, Befehle 
oder Zeilen gewünscht wird, muß die Breitschriftphase ent¬ 
sprechend mit (Oj beendet werden. Im Beispielprogramm 
in Bild 5 sehen Sie dieses Vorhaben realisiert. Hier bewirkt 


Bild 1. Vergrößertes 
Grafiksymboi aus dem 
Beispiel in Bild 1 


TEST®LAUF 

10 REM GRAPHIK-MODUS 
20 REM IM LISTING 
30 0PEN4j 4 

40 PRINT#4,"TEST®LAUF" 
50 PRINT#4 : CL0SE4 

READY. 


das (Nj vor dem Wort »Test« die Umschaltung auf Breit¬ 
schrift, während ein (Oj vor »Lauf« diesen Modus beendet. 

Die Druckerstartpositionierung - vergleichbar mit TAB - 
wird normalerweise mit CHR$(16) und nachgestellter Start¬ 
adresse vorgenommen. Also etwa: 

PRINT # 4,CHR$(16) "10 TEST" 

Diese Zeile druckt beginnend in Spalte 10 nur das Wort 
»TEST« 3. Die im String vorangestellte Zahl dient dabei 
als Startadresse. Das kürzere Äquivalent sieht nun wie folgt 
aus: 

PRINT # 4, "(P) 10 TEST" 

Die Suche nach den Synthetischen 


Doch Vorsicht! Obwohl diese Anweisung während des 
Programmlaufs korrekt ausgeführt wird, verschluckt sie der 
Drucker im Listing vollständig. Das Beispiel in Bild 6 zeigt, 
daß von (PJ10 zwischen »TEST« und »LAUF« nichts mehr zu 
bemerken ist. 

Damit verbietet sich die Anwendung des synthetischen 
(Pj bei Programmen, die zum Beispiel zur Veröffentlichung 
vom Drucker dokumentiert werden sollen. 

Für die Zeichen (Zj Zeichenwiederholung und ([j (Punkt¬ 
adresse für Druckerstart) haben sich bislang noch keine 
sinnvollen Einsatzmöglichkeiten ergeben. Sie sollen daher 
jetzt nicht weiter diskutiert werden. Auch auf die Beschrei¬ 
bung von (Qj, (R), [SHIFT Qj und (SHIFT Rj wird verzichtet, 
da sie keine synthetischen Zeichen sind und sich damit 
»ganz normal« verhalten. 

Wie ein mit synthetischen Steuerzeichen gestaltetes Li¬ 
sting aussehen kann, sehen Sie im abschließenden Bei¬ 
spiel (Bild 7). Vielleicht versuchen Sie einmal, die versteck¬ 
ten und unsichtbaren Steuerzeichen herauszufinden. 

Das folgende Programm ermöglicht die systematische Su¬ 
che nach allen vom Betriebssystem unterstützten Steuer¬ 
zeichen (Listing 1). Man ist nun nicht mehr angewiesen auf 
zum Teil lückenhafte Tabellen synthetischer Steuerzei¬ 
chen, sondern kann sich statt dessen selbst auf die Suche 
begeben. 

Das Programm-Listing zur Steuerzeichensuche (Listing 
1) gibt nach Eingabe des gewünschten ASCII-Wertes alle 
Tastenkombinationen aus, deren Betätigung die Tastatur- 
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decodierroutine dazu veranlaßt, den entsprechenden 
ASCII-Wert in den Tastaturpuffer zu schreiben. 

Es werden allerdings auch solche Kombinationen aufge¬ 
führt, deren »ASCII-Werte« zwar in den Decodiertabellen 


gung der Basic-Interpreter zuständig ist, kann dieses Pro¬ 
gramm nicht erkennen, da es lediglich auf die Tastaturde¬ 
codiertabellen im Kernal Bezug nimmt. 

(Jürgen Wagner/Engin Gülen/M. Jobst/sk) 



TEST Ln.F 

10 REH DRUCKSTflRTPQSITION 
15 REM IST IM LISTING 
20 REM NICHT SICHTBRR 
30 0FEN4/4 

40 PRINT#4, "TESTLRUF 1 ' 

50 PRINT#4 ; CL0SE4 

RERIV. 


Bild 6. Beispiel: Ab Spalte 
10 wird gedruckt. 

Die Druckeranweisung 
wird nicht gelistet. 


(die ab $EB81 im Betriebssystem beginnen) an entspre¬ 
chender Stelle aufgeführt sind, jedoch NICHT im Tastatur¬ 
puffer erscheinen (zum Beispiel die »2« bei Betätigung der 
SHIFT-Taste). Der Leser wird diese jedoch schnell von der 
ersten Gruppe unterscheiden können. 


TEST LAUF 

10 REM ZEILENVORSCHUB 
20 REM IM LISTING 
30 0PEN4..4 
40 PRIHT#4,"TEST 
LAUF" 

50 PRINT#4 : CL0SE4 
READV, 


Bild 3. Beispiel-Programm 
zum Zeilenvorschub 
im Wort 


180 REM DEMO ZUR OPTISCHEM STRUKTURIERUNG 
110 REM VON DRUCKER-LISTINOS MIT 

120 REM" SVNTHET I SCHIEN 

130 REM" STEUERZEICHEN 

200 REM"# HflUPTPROGRflriM * 

210 F0RI=1TQS4 

220 PRINT"64 ' ER-MflGRZ I N 
230 GOSUB300‘NEXT : " 

240 END 

300 REM '* UNTERPROGRAMM * 

3i0 FORJ=1TO50 : HEXT 
320 RETURN : " 

400 REM'OR IGI NAL-L I ST I NG !" 
RERDV. 


646F) OHL 

Zum Schluß noch zwei Bemerkungen: 

1) Bei gleichzeitigem Erscheinen von zwei oder mehre¬ 
ren Tastenkombinationen für einen bestimmten ASCII- 
Code kann oft - jedoch nicht immer - eine Kombination ge¬ 
gen eine andere ausgetauscht werden, ohne das Endresul- 


Bild 1 . Beispiel zur Gestaltung von Listings durch 
synthetische Steuerzeichen 


TESTLAUF 

10 REM ZEILENVORSCHUB 
20 REM IM LISTING 
30 QPEN4,4 
48 PRINT#4j"TESTLAUF 

50 PRINT#4 : CL0SE4 
READV. 


Bild 4. Beispiel-Programm: 
Zeilenvorschub am 
Wortende 


tat zu verändern (Beispiel für eine Ausnahme: Sowohl die 
RUN/STOP-Taste wie auch die CTRL C-Kombination bele¬ 
gen gemäß der Decodiertabellen den ASCII-Wert »3«, je¬ 
doch kann mit < CTRL C > kein Programm gestoppt wer¬ 
den, da für die Abfrage der RUN/STOP-Taste eine geson- 


TESTLRUF 

10 REM BREITSCHRIFT 
20 REM IM LISTING 
30 0PEN4,4 

40 PRINTÜ4, "TESTLRUF" 
50 PRINT#4 : CL0SE4 

RERDV. 


Bild 5. Beispiel zum 
Umschalten von Schmal- 
auf Breitschrift 


derte Routine zuständig ist, die nur diese Taste erkennt). 
2) Alle »synthetischen Steuerzeichen«, für deren Erzeu- 


* STEUERZEICHEN * 

* FUER DEN CBM-64 * 

* ENG IN GUELEN * 
* POSTWEG 2 

* 4132 KALKAR I 


1 REM 

2 REM 

3 REM 

4 REM 

5 REM 

3 POKE532S0, 0:P0KE53281,0 
10 DIMAS<3,63) 

18 REM ANFANGSADRESSEEN DER 
13 REM TASTATUROEKOOIERTABELLEN 
20 OATA60289,60354,80413,80536 
30 FORI=0TO3iREAOA< !>:NEXT 
40 FORI=0TO3tFORJ"0TO63 
30 AS< I,J>»PEEK<A< 1)*J> 

60 NEXTJ,I 

153 REM TASTATURMATRIX 

160 DATADEL,RETURN,CRSR< RIGHT>,F7,F1,F3,F5,CRSR< DOWN) 

161 0ATA3,W,A,4,Z,S,E,SHIFT<L> 

162 DATAS,R,D,6,C,F,T,X 

163 0ATA7,Y,G,8,B,H.U,V 

164 DATA3,I,J,0,M,K,O,N 

165 DATA +,P ,L , - , ..DOPPELPUNKT,G,KOMMA 

166 DATAE,*,),HOME,SHIFT<R),=,t,/ 

167 DATA 1 CTRL,2,SPACE,C=,Q,RUN/STOP 

170 DI MTA*< 64 >:FORI =0TO63 ! READTA*( 1 > : NEXT I 

130 DATA-,SHIFT,C» .CTRL , 

ISO FORI=0TO3:READA*< 1)!NEXT 

200 1 M=UT"—a ASC 1 1 -KODE “;ASX 

210 IFASX< 0ORAS1O255THEN200 

220 PR INT:PRINTIFORI=0TO3:FORJ«0TO63 

230 !FASX=AS< I,J1THENPRINT*S"A*C I),!GOTD2S0 

240 GOTO270 

250 IFLEFT* TA« J> ,2>=LEFT*< A*< I > ,2 1THENPR INT: GOTO270 
260 PRINT"k."TA*C J) 

270 NEXTJ,I 

280 PRINTSPC< 193)'ÄJ TASTE ■ 

230 GETAS!IFAS=""THEN230 ' 

300 GOTO200 
READY. 
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SPIELE 


C64 


Block'n Bubble 

Viel Aktion gibt es. Aber auch Überlegung erfor¬ 
dert dieses lustige Spiel für den C64. Der Clou da¬ 
bei ist: Man kann mit zwei Personen spielen. 

S tellen Sie sich vor, Sie sind ein Angehöriger der Zaube¬ 
rergilde. Allen anderen Zauberern wollten Sie auf der 
großen Jahresversammlung zeigen, was für magische 
Tricks Sie beherrschen. Als Sie Ihre Kräfte spielen ließen, 
unterlief Ihnen allerdings ein kleiner Fehler. Im gesamten 
Versammlungsgebäude mit seinen 20 Räumen haben sich 
die unliebsamen Resultate Ihres mißglückten Spruchs ein¬ 
genistet. Sie haben die Aufgabe, die gefährlichen, herum¬ 
sausenden Kugeln wieder zu beseitigen. Wenn Sie einen 
guten Freund unter den Zauberern haben, können Sie 
auch mit ihm auf Bubble-Jagd gehen (Bild). Gesteuert wird 
die erste Spielfigur (mit der roten Mütze) durch einen Joy¬ 
stick in Control-Port 2. Ein zweiter Spieler muß seinen Joy¬ 
stick in Port 1 betreiben. Durch Knopfdruck und Drücken 
des Joysticks in die gewünschte Richtung wird ein Schuß 
abgefeuert. Sollten Sie sich in einer ausweglosen Situation 
befinden, zum Beispiel von verschiebbaren Mauerblöcken 
eingeschlossen oder wenn ein Bubble-Jumper unerreich¬ 
bar ist, so müssen Sie sich gegen eine Wand stellen und 
schießen. Sie vernichten sich dadurch zwar selbst und ver¬ 
lieren eines Ihrer wichtigen Leben, können aber im glei¬ 
chen Level nochmals beginnen. 

Das Spiel (Listing) kann mit der Fl-Taste jederzeit ange¬ 
halten und wieder fortgesetzt werden. Mit < RESTORE> 



Bild. Gefahr im Labyrinth der verschiebbaren Blöcke 


wird das gesamte Spiel von neuem gestartet. Ziel des 
Spiels ist es, jeden Level von allen Bubble-Jumpern zu rei¬ 
nigen. Dabei ist natürlich Vorsicht geboten, denn diese klei¬ 
nen flinken Kugeln kosten bei Berührung eines ihrer drei 
Leben. Sie müssen sich Wege mittels der verschiebbaren 
Wände selbst suchen, können Teleporter-Türen benutzen 
und haben nur eine bestimmte Kraftreserve zur Verfügung. 
Falls es die Punktzahl erlaubt, können Sie sich in eine 
Highscore-Liste eintragen, die auf Diskette gespeichert 
wird. Wundern Sie sich beim ersten Laden des Spiel also 
nicht, wenn vom Programm versucht wird, noch ein File zu 
laden und dies nicht gelingt. Man muß erst einmal gespielt 
haben, damit eine Liste auf Diskette gespeichert vorliegt. 

Alle 20 Level des Spiels sind mit etwas Geduld und Über¬ 
legung zu lösen. (Marcus Wagner/ad) 
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20 

20 

20 

20 

e9 

3cf 9 

dl 

dl 

a 6 

20 

20 

a 6 

20 

a 6 

65 

4009 : 

54 

52 

41 

43 

54 

49 

4 f 

4e 


39f 1 

20 

20 

20 

20 

20 

20 

20 

20 

n 

3d01 

20 

20 

20 

20 

dl 

20 

a 6 

a 6 

43 

4011 : 

2 c 

20 

57 

48 

49 

4c 

4S 

20 

79 

39f 9 

a 6 

a 6 

20 

a 6 

20 

20 

20 

20 

93 

3d09 

20 

a 6 

dl 

dl 

20 

dl 

a 6 

20 

96 

4019 : 

49 

20 

48 

41 

4 4 

20 

50 

52 

d 8 

3a01 

20 

20 

20 

20 

20 

20 

20 

20 

01 

3dll 

20 

dl 

20 

a 6 

20 

20 

d7 

20 

99 

4021 : 

4f 

42 

4c 

45 

4d 

53 

?0 

57 


3a09 

20 

20 

a 6 

20 

a 6 

a 6 

a 6 

a 6 

6 e 

3dl9 

dl 

20 

a 6 

a 6 

20 

a 6 

dl 

20 

37 











3all 

a 6 

a 6 

a 6 

a 6 

a 6 

a 6 

a 6 

a 6 

10 

3d21 

dl 

dl 

a 6 

a 6 

a 6 

a 6 

20 

a 6 

c7 
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3al9 

a 6 

a 6 

a 6 

a 6 

a 6 

a 6 

a 6 

a 6 

18 

3d29 

a 6 

a 6 

a 6 

a 6 

a 6 

20 

a 6 

a 6 

f 4 

(Fortsetzung) 
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49 

54 

48 

20 

41 

20 

4i? 

4f 

97 

4031 

56 

45 

4c 

59 

20 

47 

49 

52 

6 e 

4039 

4c 

2 e 

2 e 

2 e 

20 

54 

46 

41 

36 

4041 

4e 

4b 

53 

20 

46 

4f 

52 

20 

76 

4049 

54 

48 

45 

20 

4d 

56 

53 

49 

76 

4051 

43 

2 d 

44 

41 

54 

41 

53 

20 

41 

4059 

54 

4f 

20 

41 

2 e 

42 

41 

55 

2 a 

4061 

45 

52 

4e 

46 

45 

49 

4e 

44 

8 c 

4069 

21 

20 

40 

20 

42 

59 

20 

43 

a4 

4071 

2 e 

43 
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50 

2 e 

20 

31 

39 

f 2 

4079 

38 

36 

20 

20 

20 

20 

20 

20 

9c 

4081 

20 

20 

20 

00 

00 

02 

04 
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ee 

4089 

07 
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04 

05 

44 

4f 

4e 

27 

7d 

4091 

54 

20 

54 

52 

69 

20 

49 

64 

b9 

4099 
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20 

44 

4f 

20 

49 

54 

21 

bO 
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21 

21 

00 

92 

9b 

93 

08 

c7 

ab 

40a9 

c3 

c3 
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c3 

c3 

c 2 

03 

c3 

60 

40bl 

c3 

c3 

c3 

c3 

c 2 

c3 

c3 

c3 

aO 
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c3 

c3 

c3 

c3 

c3 

c 2 

c3 

c3 

bO 

40ol 

c3 

c3 

02 

c3 

c3 

c3 

c3 

c3 

80 

40o9 

c3 

c3 

c 2 

c3 

c3 

c 2 

c4 

cl 

80 

40dl 

20 

20 

20 

20 

20 

20 

20 

20 

dl 

40d9 

20 

20 

20 

20 

20 

20 

20 

20 

d9 

40el 

20 

20 

20 

20 

20 

20 

20 

20 

el 

40e9 

20 

20 

20 

20 

20 

20 

20 

20 

e9 

40f 1 

20 

20 

20 

20 

20 

20 

cl 

cl 

bb 

40f 9 

20 

ce 

ce 

ce 

ce 

20 

ce 

20 

77 

4101 

20 

20 

20 

oe 

ce 

ce 

ce 

20 

f 2 
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ce 

ce 

ce 

ce 

20 

ce 

20 

20 

05 
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ce 

20 

20 

20 

ce 

20 

ce 

20 

65 

4119 

20 
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20 

20 

ce 

20 

cO 

cO 

lf 
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20 

ce 

20 

20 

ce 

20 

ce 

20 

le 
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20 

20 

20 

ce 

20 

20 

ce 

20 

ba 

4131 
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20 

20 

20 
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20 

ce 
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20 

oe 

20 

20 

ce 

ce 

27 
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20 

ce 

20 

20 

cO 

cl 

34 
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ce 
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20 

20 

ce 

20 

de 
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20 

20 
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20 
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20 
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20 
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20 

lc 
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cl 

cO 

36 
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20 
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20 

ce 
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6 e 
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20 
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20 

20 

ce 

20 
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20 
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20 

ce 

02 
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20 

20 

ce 

20 

44 
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20 

cl 

cl 
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ce 

ce 
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ce 

ce 
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la 
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cl 
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da 
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20 

cl 
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20 

c9 

41dl 
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20 

dl 
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d9 
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ce 
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4b 
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ce 

ce 
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20 
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ce 
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3d 

4209 

ce 

20 

20 

20 

20 

20 

cO 

cO 

7b 
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20 
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59 
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20 
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20 

ce 
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4221 

20 

ce 

20 
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20 

20 

ce 
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ce 

20 

20 

20 

20 

ce 

20 

20 
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20 

20 

20 

20 

20 

20 

cl 

cl 

fb 

4239 

20 

20 

20 

20 

ce 

ce 

ce 

20 

54 

4241 
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ce 

20 

ce 

ce 

9b 
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20 

ce 

ce 
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4251 
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ce 
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cO 

cl 

lf 
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20 

ce 
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20 
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20 

20 

ce 

20 

ce 

20 

66 
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20 
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20 

ce 

20 

20 
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20 

59 

4279 

c« 
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20 

20 

20 

ce 

20 

20 

9d 
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20 
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20 
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20 

cl 

cO 

49 
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20 

20 

20 
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oe 

c* 

ce 

ca 

02 
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20 

ce 

ce 

ce 

oe 

20 

ca 

ce 

6 c 
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ce 

ce 
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ce 

ce 

20 
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ce 

ce 
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oe 

ce 

ce 

b5 
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ce 

20 
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20 
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cl 

cl 

21 
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20 

20 

20 

20 

30 

*0 

20 

20 

bl 

42b9 

20 

20 

20 

20 

20 

20 

20 

20 

b9 

42cl 

20 

20 

20 

20 

20 

20 

20 

20 

cl 
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20 

20 

20 
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20 

20 

20 

20 

c9 

42dl 

20 

20 

20 
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20 

20 

cl 
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a5 
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o3 
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c3 

c3 

c3 
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55 
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c3 

c 2 

o3 

c3 

c3 

c3 

c3 

c 2 

5d 

42e9 

c3 

c3 

c3 

c3 

c 2 

o3 

o3 

c3 

d 8 

42f 1 

c3 

c3 

c3 

c 2 

c3 

c3 

c3 

c3 

dO 

42f 9 

o3 

c3 

c3 

c 2 

c3 

c3 

o5 

11 

7a 

4301 

11 

11 

20 

20 

9c 

3e 

3e 

3e 

d 8 

4309 

20 

9e 

46 

31 

20 

05 

4f 

4e 

34 

4311 

45 

20 

50 

4c 

41 

59 

45 

52 

9d 

4319 

20 

20 

9e 

46 

33 

20 

05 

54 

ah 

4321 

57 

4f 

20 

50 

4c 

41 

59 

45 

fl 

4329 

52 

20 

9c 

3c 

3c 

3c 

9b 

20 

8 e 

4331 

20 

11 

c3 

c4 

20 

20 

20 

20 

27 


4339 : 

20 

20 

20 

20 

20 

20 

20 

20 

39 

4341 : 

20 

20 

20 

20 

20 

20 

20 

20 

41 

4349 : 

20 

20 

20 

20 

20 

20 

20 

20 

49 

4351 : 

20 

20 

20 

20 

20 

20 

20 

20 

51 

4359 : 

c7 

c3 

20 

cO 

20 

20 

20 

20 

e 6 

4361 : 

20 

20 

20 

20 

20 

20 

20 

20 

61 

4369 : 

20 

20 

20 

20 

20 

20 

20 

20 

69 

4371 : 

20 

20 

20 

20 

20 

20 

20 

20 

71 

4 379 : 

20 

20 

20 

20 

20 

20 

20 

20 

79 

4381 : 

cl 

20 

20 

cl 

20 

20 

20 

20 

56 

4389 : 

20 

20 

20 

20 

20 

20 

20 

20 

89 

4391 : 

20 

20 

20 

20 

20 

20 

20 

20 

91 

4399 : 

20 

20 

20 

20 

20 

20 

20 

20 

99 

43ol : 

20 

20 

20 

20 

20 

20 

20 

20 

al 

43a9 : 

cO 

20 

20 

cl 

20 

20 

20 

20 

7d 

43bl : 

20 

20 

20 

20 

20 

20 

20 

20 

bl 

43b9 : 

20 

20 

20 

20 

20 

20 

20 

20 

b9 

43cl : 

20 

20 

20 

20 

20 

20 

20 

20 

cl 

43c9 : 

20 

20 

20 

20 

20 

20 

20 

20 

o9 

43dl : 

cl 

20 

c3 

c5 

20 

20 

20 

20 

10 

43d9 : 

20 

20 

20 

20 

20 

20 

20 

20 

d9 

43el : 

20 

20 

20 

20 

20 

20 

20 

20 

el 

43e9 : 

20 

20 

20 

20 

20 

20 

20 

20 

e9 

43f 1 : 

20 

20 

20 

20 

20 

20 

20 

20 

fl 

43f9 : 

c 6 

8 e 

00 

20 

c7 

81 

aO 

ae 

73 

4401 : 

a 2 

72 

20 

a 2 

81 

a9 

02 

8 d 

cl 

4409 : 

22 

dO 

a9 

07 

8 d 

23 

dO 

20 

54 

4411 : 

a5 

b 2 

20 

c7 

b 2 

20 

d7 

b 2 

01 

4419 : 

a9 

43 

8 d 

e7 

c3 

a9 

Of 

8 d 

a5 

4421 

e7 

db 

a9 

00 

85 

fc 

85 

fa 

ac 

4429 

20 

cl 

81 

c 6 

fc 

10 

18 

a9 

67 

4431 

47 

85 

fc 

a5 

fa 

c9 

05 

dO 

e 2 

4439 

04 

a9 

ff 

85 

f a 

e 6 

fa 

a 6 

e 2 

4441 

fa 

bd 

54 

ae 

8 d 

22 

dO 

20 

72 

4449 

e4 

ff 

fO 

df 

c9 

85 

fO 

08 

01 

4451 

c9 

86 

dO 

d7 

a9 

01 

dO 

02 

76 

4459 

a9 

00 

8 d 

d4 

86 

78 

a9 

fO 

b5 

4461 

8 d 

la 

dO 

a9 

31 

a 2 

ea 

8 d 

54 

4469 

14 

03 

8 e 

15 

03 

20 

44 

e5 

53 

4471 

a 2 

17 

a9 

00 

9d 

00 

d4 

ca 

cc 

4479 

10 

fa 

58 

4c 

cb 

b3 

a9 

00 

a7 

4481 

85 

02 

ad 

51 

ad 

Oa 

48 

aa 

3e 

4489 

bd 

cf 

93 

85 

40 

bd 

dO 

93 

20 

4491 

85 

41 

aO 

00 

a9 

01 

8 d 

86 

c5 

4499 

02 

bl 

40 

29 

Of 

09 

30 

20 

e3 

44al 

16 

e7 

c 8 

cO 

05 

dO 

f 2 

a9 

eb 

44a9 

07 

8 d 

86 

02 

68 

aa 

bd 

a 6 

79 

44bl 

92 

85 

,40 

bd 

a7 

92 

85 

41 

75 

44b9 : e6 (13 
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20 

16 

7b 

44cl 

e7 

c 8 

cO 

0 a 

dO 

f 6 

a5 

02 

dd 

44c9 

dO 

2 d 

e 6 

02 

e 6 

d3 

e 6 

d3 

7a 

44dl 

ee 

51 

ad 

4c 

51 

b 2 

a9 

00 

ae 

44d9 

8 d 

51 

ad 

a 2 

14 

aO 

03 

20 

61 

44el 

bd 

81 

20 

4d 

b 2 

a 6 

d 6 

e 8 

9e 

44e9 

aO 

03 

20 

bd 

81 

ee 

51 

ad 

fb 

44f 1 

ad 

51 

ad 

c9 

Oa 

dO 

eb 

60 

83 

44f 9 

a 2 

00 

bd 

52 

ad 

fO 

f 8 

29 

ee 

4501 

3f 

9d 

52 

ad 

e 8 

dO 

f 3 

60 

ff 

4509 

78 

a9 

15 

a 2 

b3 

8 d 

14 

03 

ed 

4511 

8 e 

15 

03 

a9 

bl 

8 d 

12 

dO 

91 

4519 

ad 

11 

dO 

29 

7f 

8 d 

11 

dO 

f 2 

4521 

a9 

81 

8 d 

la 

dO 

a9 

fa 

85 

83 

4529 

20 

a9 

00 

85 

21 

8 d 

53 

ae 

f 8 

4531 

85 

24 

85 

23 
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07 

9d 

70 

48 

4539 

e 2 

ca 

10 

fa 

a9 

08 

85 

22 

19 
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20 

5f 

b3 

4c 

88 

95 

ad 

19 

a5 
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dO 

8 d 

19 

dO 

30 

07 

ad 

Od 

4c 
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de 

58 

4c 

75 

b3 

ad 

12 

dO 

ae 

4559 

c9 

ba 

bO 

22 

a9 

ba 

8 d 

12 

ba 

4561 

dO 

c 6 

22 

a5 

22 

8 d 

16 

dO 

5a 

4569 

fO 

03 

4c 

bc 

fe 

a9 

08 

85 

ee 

4571 

22 

e 6 

20 

ea 

ea 

oa 

ea 

ea 

f 3 

4579 

20 

5f 

b3 

4c 

bc 

fe 

a9 

d 8 

db 

4581 

8 d 

16 

dO 

a9 

08 

8 d 

18 

dO 

72 
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a9 

bl 

8 d 

12 

dO 

4c 

bc 

f e 

11 
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a4 

20 
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00 

b9 

52 

ad 

9d 

Oe 
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80 
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a9 

01 

9d 

80 

da 
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eO 
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e 8 

eO 

28 

dO 

ef 

60 

c 6 

23 

81 

45a9 

10 

23 

a 6 

24 

c9 

07 

dO 

Of 
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45bl 

20 

9f 

b3 

a9 

ff 

85 

24 

ad 

db 

45b9 

53 

ae 

49 

ff 
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53 

ae 
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04 

85 

23 

aO 

24 

ad 

bf 
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53 

ae 

9d 
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95 

cO 

45dl 

a9 
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03 

a9 
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85 

04 

64 
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fb 

a5 

fb 

29 

07 

dO 

02 

b 8 
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e 6 

fb 

a 2 
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aO 

24 

a5 

fb 

68 
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03 

88 
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03 

18 

29 
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69 
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03 
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04 

ed 
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09 
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bd 
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00 

bd 
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ae 
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00 
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Abenteuer 

eines Höhlenforschers 


In Höhlen lauern viele Gefahren, das weiß man 
aus Filmen. Wie gefährlich und schwierig das Le¬ 
ben eines Höhlenforschers ist, erleben Sie haut¬ 
nah mit »Cave Raid«. 

D as Spiel »Cave Raid« ist ein »Jump and Run«-Spiel, 
bei dem Sie sich die Bilder frei entwerfen können. 
Nach dem Laden und Starten des Programms sehen 
Sie das Titelbild vor sich, das die wichtigsten Funktionen 
anzeigt. Mit den Tasten <0> bis <9> bestimmen Sie die 
Höhle, in der Sie starten. Den Schwierigkeitsgrad stellen 
Sie mit »A« (leicht) bis »D« (sehr schwer) ein. Durch Druck 
auf den Feuerknopf des Joysticks in Port 2 beginnen Sie 
das Spiel. Ihre Aufgabe lautet, in jedem Level die Schatztru¬ 
he zu finden. Diverse Hindernisse wie Totenköpfe, Fleder¬ 
mäuse, Dolche und Spieße erschweren die Suche, da sie 
bei Berührung tödlich wirken. Stürze aus großer Höhe sind 
zu vermeiden, weil diese ebenfalls zum Verlust des wertvol¬ 
len Lebens führen. Man erhält zwar für jeden gelösten Le¬ 
vel ein zusätzliches Männchen zu den fünf ursprünglich 
vorhandenen, trotzdem ist die Lebensspanne sehr, sehr 
kurz. Wasser hat zwar keine Balken, aber es schadet dem 
Männchen auch nicht. Also keine Angst vor einer kleinen 
Kneippkur. Die Schlüssel haben eine besondere Funktion, 
denn wenn man einen von ihnen aufhebt, verschwinden al¬ 
le Mauern in diesem Level, nicht aber der Felsboden. Die 



Bild 1. Gefahr im Höhlenlabyrinth 

Höhle an sich bleibt unberührt, nur verschafft man sich so 
manchmal einen Durchgang. In einigen Leveln ist das die 
Voraussetzung, um an das Ziel zu kommen. Aber Vorsicht, 
ohne Mauern verliert man auch leicht den Boden unter den 
Füßen. Man braucht daher eine Weile, um den optimalen 
Lösungsweg zu finden. Wenn Ihnen die Situation aus¬ 
weglos erscheint, bringt Sie <F1 > zum Titelbild zurück. 
Um sich den Schweiß von der Stirn zu wischen, läßt sich 
das Spiel mit der <SHIFT> oder <SHIFT/LOCK>-Taste 
anhalten. Da es kein Zeitlimit für das Spiel gibt, können Sie 
sich ruhig Zeit lassen, sofern Ihnen das Programm über¬ 
haupt Zeit zum Nachdenken läßt. Es gibt keine Punktwer¬ 


tung und daher auch keine High-Score-Liste. Das Ziel ist 
nur, lebend und als reicher Mann aus der Höhle zu entkom¬ 
men. 

In »Cave Raid« sind zehn Bilder enthalten, die Sie alle be¬ 
stehen müssen, um den höchsten Rang zu erreichen. Las¬ 
sen Sie sich nicht entmutigen, denn diese Bilder sind sehr 
schwer, aber lösbar. Wenn Sie nicht mehr weiter wissen, se¬ 
hen Sie sich das komplette Bild im Editor an, dem zweiten 
hervorstechenden Merkmal von »Cave Raid« (Bild 1). 

Bilder im Handumdrehen 


Den Editor erreichen Sie vom Titelbild aus durch <F3>. 
Gesteuert wird der Cursor diesmal durch die Cursortasten 
und nicht durch den Joystick wie im Spiel. Mit < F5> und 
< F7> schaltet man zwischen den Höhlen um. Der Editor 
erlaubt Ihnen, nicht nur die bestehenden Bilder zu analy¬ 
sieren, Sie können sie auch verändern und vereinfachen. 
Da anfangs die Fledermäuse die Hauptschwierigkeit sind, 
bietet sich die Gelegenheit, diese aus den Bildern zu entfer¬ 
nen. Um ein Bildteil zu setzen, müssen Sie mit dem Cursor 
darauf fahren und <A> (Aufnehmen) drücken. Dabei ist 
es egal, ob sich das ausgewähite Teil in den Menüzeilen am 
Boden befindet oder im Bild verwendet wird. Inden unteren 
zwei Zerfcn finden Sie alle Zeichen, die der Editor zu bieten 
hat. Um ein Teil in das Bild einzubauen, drücken Sie < S > 
(Setzen). Wenn Sie etwas löschen wollen, müssen Sie ein 
Leerzeichen wählen und einsetzen. Mit der SPACE-Taste 
löschen Sie eine Zeile, und <SHIFTCLR> löscht den ge¬ 
samten Bildschirm. Das sollten Sie nur tun, wenn Sie ein 
völlig neues Bild zeichnen wollen. Ein ganz neues Bild ist 
eine Alternative, wenn Ihnen die bestehenden zu schwer 
sind, oder wenn Sie alle Höhlen gemeistert haben. Beach¬ 
ten Sie bei neuen Bildern, daß die Spielfigur nicht tiefer als 
vier Zeichen fallen darf, da sie sonst »sterben« würde. Der 
kleine Forscher springt nur drei Zeichen weit, also stellen 
Sie nicht zu viele Hindernisse nebeneinander, wenn er 
durch einen Gang gehen muß. Die Spielfigur kann auf allen 
Teilen stehen, die nach unten gezackt und oben glatt sind. 
Wenn Sie nach oben gezackte Teile auf die darüberliegen¬ 
de Zeile setzen, entsteht der Eindruck einer unregelmäßi¬ 
gen, zerklüfteten Höhle. Alle Bodenstücke dürfen auch als 
Bausteine für Treppen verwendet werden. Bei Treppen 
müssen sich die Stufen überlappen, das heißt die untere 
Stufe muß ein Stück unter der oberen weitergeführt sein, 
sonst ist ein mehr oder minder tiefer Sturz die Folge. Leitern 
und Seile sind eine wesentlich sicherere Methode, um Hö¬ 
henunterschiede zu überwinden. Der Unterschied zwi¬ 
schen Seilen und Leitern ist, daß die Fledermäuse von den 
Leitern abprallen und ihre Richtung ändern, während sie 
durch Seile durchfliegen und das Männchen am Seil töten. 
Auf einer Leiter ist man also immer sicher. 

Festmahl für die Fledermaus 


Generell gilt, daß die Fledermäuse vor harten Gegenstän¬ 
den wie Mauern zurückschrecken und ihre Flugbahn än¬ 
dern. Verfallen Sie bitte nicht der Illusion, daß der Forscher 
zu den harten Gegenständen gehört. Ein Zusammenstoß 
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wird immer mit einem Festmahl für die Fledermaus enden. 
In jedem Bild muß ein Startpunkt, der durch das blinkende 
»S« dargestellt ist, und eine Schatztruhe vorhanden sein. 
Der Startpunkt muß mindestens ein Zeichen Abstand zum 
Rand haben, sonst wird er nicht gesetzt. Das wichtigste Teil 
der Truhe ist das Mittelstück. Sie können also durchaus 
»Locktruhen« einbauen, die den Spieler auf eine falsche 
Fährte führen. Die kleinen weißen Punkte bewirken, daß die 
Spielfigur nach dem Dahinscheiden an diesem Ort beginnt 
und nicht am Startpunkt. Die Fackeln sind genau wie das 
Wasser »nur« Verzierung und haben keine schädliche Wir¬ 
kung. Damit besitzen Sie das Wissen und das Handwerks¬ 
zeug, um eine neue Höhle zu entwerfen. Was Sie jetzt noch 
brauchen ist eine Muse, die Sie inspiriert. 


Immun gegen Tofenköpfe 


Damit Ihr Werk nicht verlorengeht, können Sie es mit 
<F3> speichern. Vor dem Speichern sollten Sie die neu¬ 
en Bilder testen. Prüfen Sie, ob sie lösbar und ob keine aus¬ 
weglosen Fallen enthalten sind, aus denen sich das Männ¬ 
chen nicht befreien kann. Zum Testen verlassen Sie den 
Editor mit <F1 > und drücken dann den Feuerknopf. Sie 
landen automatisch in der zuletzt bearbeiteten Höhle. 


Wenn ein Fehler existiert, unterbrechen Sie wiederum mit 
<F1 > und springen zurück in den Editor. Wenn alles in 
Ordnung ist, können Sie Ihre Höhlen speichern. Das Pro¬ 
gramm speichert alle zehn Bilder, die insgesamt 41 Blocks 
auf der Diskette benötigen. Auf Kassette können Sie leider 
nicht speichern. Geladen werden die Bilder durch <F3> 
solange das Titelbild zu sehen ist. Es ist zwar noch kein For¬ 
scher vom Himmel gefallen, vom Höhlenboden in einen Ab¬ 
grund aber leider schon oft. Deshalb verraten wir Ihnen 
gleich die richtigen POKEs, um Ihrem kleinen Helden Un¬ 
sterblichkeit zu verleihen: POKE 3873,234. Nach Eingabe 
dieses POKEs werden Ihnen keine Leben mehr abgezo¬ 
gen. Die folgenden POKEs nehmen Ihren Feinden die 
Schrecken: POKE 3835,76:POKE 3836,235:POKE 3837,10. 
Man ist dadurch immun gegen Fledermäuse, tiefe Stürze, 
Totenköpfe und was der Figur sonst noch schadet, aber die 
Lösung wird dadurch sehr einfach und das Spiel verliert 
seinen Reiz. Außerdem kann man so nicht mehr bei be¬ 
stimmten Fallen »Selbstmord« begehen. Dann hilft nur 
noch der Druck auf < Fl >, um das Spiel vorzeitig zu been¬ 
den. 

Wir sind sicher, daß Sie die hervorragend animierte Gra¬ 
fik fesseln wird. »Cave Raid« braucht sich nicht hinter pro¬ 
fessionellen Spielen zu verstecken. Die Aufgabe, die vor Ih¬ 
nen liegt, ist schwer, aber gerade in der Schwierigkeit liegt 
die Faszination. (Volker Roth/kn) 
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C64 


64’er-KURSUBERSICHT 


Geballtes Know-how! 


Aufgabe des 64’er-Magazins ist es auch, seinen 
Lesern Wissen über den C 64 und seine Program¬ 
mierung zu vermitteln. Dies geschieht in der Re¬ 
gel in Form von Kursen. Hier finden Sie die wich¬ 
tigsten Kurse nach Themen geordnet. 

A ngefangen von der grundsätzlichen Erklärung der 
Funktionsweise eines Computers über Basic-, Musik- 
und Grafikkurse bis hin zu einer umfassenden Einfüh¬ 
rung in Maschinensprache und deren Programmierung 
sind nahezu alle Bereiche abgedeckt. In dieser Übersicht 
sind die wesentlichen Kurse zusammengefaßt, die in der 
64’er oder in Sonderheften veröffentlicht wurden. Diese 
bringen dem Einsteiger das unerläßliche Wissen über sei¬ 
nen Computer nahe. 

Adventures, Spiele 


Adventures zählen zu den beliebtesten Spielen für den 
C64. Ob Text-Adventure ä la Infocom oder Grafik-Adven- 
ture wie »The Hobbit«, ein Klassiker in diesem Genre - die 
beiden aufeinander aufbauenden Kurse vermitteln Ihnen 
das nötige Wissen, um ähnliche Spiele zu programmieren, 
die sich mit professionellen Produkten durchaus messen 
können: 

Abenteuer selbst programmiert, Sonderheft 2/85 
Erweiterter Adventure-Kurs mit Abhandlung von: 

1. Dateiverwaltung S4CR Of 

2. Künstliche Intelligenz 

3. Parser-Programmierung 

4. Grafik in Adventures 

5. Adventure-Programmierung 
Sonderheft 4/86 

Programmierung von bewegter Grafik und Scrolling: 
Sonderheft 17 und Sonderheft 23 

Assembler, Speicherarchitektur des C64 


Wer seinen C64 wirklich bis zum Letzten ausreizen will, 
was Grafik, Geschwindigkeit oder Musik betrifft, der muß 
aus den Grenzen des Basic 2.0 ausbrechen. Maschinen¬ 
sprache heißt das Zauberwort, das die Türen zu neuen Be¬ 
reichen der Beherrschung des Computers öffnet. Nicht zu 
trennen von dieser Materie ist natürlich eine genaue Kennt¬ 
nis der Speicherstruktur des C64 und vor allem der Zero- 
Page. Dazu die folgenden Kurse: 

Assembler ist keine Alchimie 
64’er 9/84 bis 10/85 
komplett im Sonderheft 8/85 
Von Basic zu Assembler (13 Teile) 

64’er 1/86 bis 4/87, komplett im Sonderheft 21 
Memory-Map mit Wandervorschlägen 
64'er 11/84 bis 6/86 
komplett im Sonderheft 7/86 

Hardware 


Viele Anwender benutzen die verschiedenen Ports des 
C 64 nur, um daran ihren Floppy-Speeder, den Joystick oder 
allenfalls einen Drucker mit Centronics-Schnittstelle anzu¬ 
schließen. Dabei erlaubt das Konzept der programmierba¬ 


ren Schnittstellen des C64 eine Vielzahl von Anwendun¬ 
gen. Und was tun, wenn der geliebte Computer plötzlich 
das Zeitliche segnet? Folgende Kurse helfen Ihnen weiter: 
Kennen Sie Ihren C64 (Hardware-Kurs) 3 Teile 
64’er Ausgaben 3/86 bis 5/86 
Die Axt im Hause..., Reparatur-Kurs, 8 Teile 
64’er Ausgaben 8/86 bis 2/87 
C64 Extern - Der Weg nach draußen 
64'er Ausgaben 8/85 bis 10/85 

Drucker 


Dein Drucker - das unbekannte Wesen. So oder ähnlich 
kann man das Verhältnis vieler Programmierer zu diesen 
Geräten charakterisieren - »Drucken muß er halt!«. Dabei 
ist es mit etwas Einblick in die Materie nicht schwer, sonst 
brachliegende Fähigkeiten des Druckers zu nutzen. Einen 
Leitfaden hierzu gibt unser Drucker-Kurs: 

Lernen Sie Ihren Drucker kennen 
Sonderheft 18 

Grafik und Sprites 


Der C64 verfügt über fantastische Grafikfähigkeiten. Um 
auch Ihnen die Programmierung, selbst von bewegter 3D- 
Grafik zu ermöglichen, wurden folgende Kurse verfaßt: 
Reise durch die Wunderwelt der Grafik 
64’er 4/84 bis 10/84 

Allee, • vas Sie schon immer über Sprites wissen wollten 

Sonderheft 2/86 

Grafik voll nutzen 

Sonderheft 5/86 

Der leichte Umgang mit Sprites 

Sonderheft 5/86 

Streifzüge durch die Grafik-Welt 

Sechs Folgen: 64'er 9/85 und 11/85, 1, 5, 8 und 12/86 

Grafik für Profis 

2 Teile, 64’er Ausgaben 5/86 und 7/86 
Der umfassendste Kurs findet sich in Sonderheft 20 zum 
Thema Grafik. Dort finden Sie in verständlicher Weise alles 
dargeboten, was zur Grafikprogrammierung nötig ist: 

1. Alle wichtigen Grundlagen, das Handwerkszeug des 
Computer-Grafikers 

2. Wichtige Grafik-Routinen in Basic und Assembler, fertig 
programmiert und sofort einsetzbar 

3. Dreidimensionale Grafikprogrammierung 

Dateiverwaltung 


Eines der interessantesten Gebiete für den Hobbyprogram¬ 
mierer ist die Dateiverwaltung. Denn für die Verwaltung 
größerer Datenmengen bietet sich ein Computer geradezu 
an. Hinzu kommt, daß es auch für den Einsteiger keine allzu 
schwere Aufgabe darstellt, sich sein eigenes Dateipro¬ 
gramm zu schreiben. Schritt für Schritt kann man sich dann 
von der rein sequentiellen Datenverwaltung zur index-se¬ 
quentiellen Methode hocharbeiten und erfährt nebenbei ei¬ 
niges über die Programmierung trickreicher Sortieralgo¬ 
rithmen: 

Grundlagen der Dateiverwaltung 
Sonderheft 9/86 

Sortieren mit dem Computer (Algorithmen), 6 Teile 
64’er Ausgaben 4/85 bis 9/85 
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Programmiersprachen 


Die erste Sprache, die der frischgebackene Besitzer eines 
C64 lernt, ist Basic. Dabei läßt sich mit Fug und Recht sa¬ 
gen, daß das Basic 2.0 des C64 nicht gerade durch Lei¬ 
stungsfähigkeit glänzt. Dennoch läßt sich aus dem Basic 
2.0 des C64 einiges durch geschickte Programmierung 
herausholen. Auch strukturierte Programmierung ist mög¬ 
lich, wenn auch nicht zwingend notwendig wie in anderen 
Hochsprachen. Dadurch kann vermieden werden, daß der 
Programmierer dank zahlloser GOTO-Befehle, mangeln¬ 
der Dokumentation und Strukturierung nach etwa einer 
Woche sich in seinem eigenen Programm nicht mehr aus¬ 
kennt. All das kann der Basic-Neuling dem Kurs im Sonder¬ 
heft 5/86 entnehmen. 

Basic-Kurs von Anfang an 
Sonderheft 19 

Floppy-Lnufwerke und Disketten 


Die Erkenntnis, daß die Floppy-Laufwerke für den C64 zu 
mehr als den Befehlen LOAD und SAVE in der Lage sind, 
verschließt sich vielen Einsteigern. Dabei stellen diese 
Laufwerke im Prinzip einen Computer mit einem eigenen 
Prozessor dar, den man auch programmieren kann. Diese 
und viele andere Tricks verraten Ihnen folgende Kurse: 
Directory-Manipulationen 
64’er Ausgaben 6/85 und 10/85 
Floppy-Kurs 

In die Geheimnisse der Floppy eingetaucht 
64’er 10/84 bis 6/85 
komplett im Sonderheft 25 
Floppy 1541 Programmieren 


Die »Feinheiten« über den Umgang mit einem Laufwerk 
vermittelt dieser Kurs aus dem Sonderheft 25 
Burst-Modus: Was ist das? 

Ebenfalls in Sonderheft 25 finden Sie diesen Beitrag zur 
Programmierung der Floppy 1570/1571. 

Die Ausnutzung der schnellen (Burst-)Routinen stellen 
dann kein Problem mehr dar. 

Musik 


Mit dem SID besitzt der C 64 einen Chip, der über große Fä¬ 
higkeiten verfügt. So ist mit dem SID ein dreistimmiger 
Synthesizer realisiert, der über Filter, ADSR-Register und 
alles was ein solches Gerät ausmacht, verfügt. Ausgestat¬ 
tet mit dem Wissen aus dem Kurs im Sonderheft 11/86 und 
unserem Listing des Monats aus der Oktober-Ausgabe 
1986 komponieren Sie im Handumdrehen hitverdächtige 
Stücke. 

Dem Klang auf der Spur 
64’er 12/84 bis 11/85 
komplett im Sonderheft 11/86 
Soundmonitor 

Listing des Monats, 64’er 10/86 

Tips, Tricks, PEEKs und POKEs 


Alles, was den C 64-Fan das Wasser im Munde zusammen¬ 
laufen läßt: Tips, Einzeiler, kurze hilfreiche Routinen und 
vieles mehr bietet das Sonderheft 24 auf über 20 Seiten. 

Sie sehen: Mit dem Know-how aus dem 64’er-Magazin 
und den Sonderheften, die Sie jederzeit nachbestellen kön¬ 
nen, srnjl Sie anderen im Wissen immer um die Nasenlän¬ 
ge, auf oie es ankommt, voraus. (sk) 


Checksummer V3 
und MSE für den C64 


Diese beiden Programme sind unentbehrlich 
beim Abtippen unserer Listings. Sie helfen, Tipp¬ 
fehler vor allem bei Maschinenprogrammen zu 
vermeiden und sparen eine Menge Zeit. 

N obody is perfect. Jeder Computer-Fan, egal ob blu¬ 
tiger Anfänger oder ausgefuchster Profi, macht beim 
Abtippen von Programmen Tippfehler. Oft sind es nur 
kleine Flüchtigkeitsfehler, die ein Programm ganz schön 
durcheinander bringen können. Schreibfehler in Basic, 
zum Beispiel »ORINT« statt »PRINT«, machen sich schnell 
bemerkbar durch die Fehlermeldung »7SYNTAX ERROR 
IN«, gefolgt von der Zeilennummer, in der der Fehler be¬ 
steht. Schwierig wird es, wenn falsche Zahlen oder Sprung¬ 
adressen eingegeben wurden. Dies geschieht leider sehr 
oft bei POKE-Anweisungen, DATAs und Eingabe von Ma¬ 
schinenprogrammen. Ein Beispiel: Angenommen, Sie 
möchten, daß innerhalb eines Programmes der Bildschirm¬ 
hintergrund weiß ist. Die Anweisung lautet: 

P0KE 52381,1 

Nach Drücken der Taste < RETURN > färbt sich der Hin¬ 
tergrund weiß. Probieren Sie es ruhig aus. Geben Sie aber 
aus Versehen 

P0KE 53821,14 



ein, färbt sich der Hintergrund himmelblau. Das ist jedoch 
die Farbe der Schrift. Die Folge: Es ist nur ein himmelblauer 
Bildschirm zu sehen. Die Schrift ist praktisch unsichtbar 
geworden. Unser Beispiel hat nur harmlose Folgen. Das ist 
nicht immer so. Leider schleichen sich solche Fehler regel¬ 
mäßig beim Abtippen ein, besonders bei Maschinenpro¬ 
grammen. Diese Fehler später zu finden, kann ein langwie¬ 
riges Unterfangen sein. 

Deshalb haben wir für Sie die Programme »Checksum¬ 
mer V3« und »MSE« (MaschinenSpracheEditor) entwickelt. 
Der Checksummer ist für Basic-Programme und der MSE 
für Maschinensprache-Listings zuständig. 
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Der Chedcsummer 64 


Zuerst einmal müssen Sie das Checksummer-Programm 
(siehe Listing 1) abtippen. Dabei sollten Sie äußerst sorgfäl¬ 
tig Vorgehen, vor allem bei den Zahlen in den DATA-Zeilen 
20 bis 30. Wenn Sie trotzdem noch einen Tippfehler ge¬ 
macht haben, meldet sich das Programm später mit einem 
entsprechenden Hinweis. Wenn Sie fertig sind, speichern 
Sie das Programm auf Diskette oder Kassette. 

Jetzt geht es los: 

1. Starten Sie den Checksummer durch die Eingabe von 
»RUN« und das Drücken der RETURN-Taste. 

2. Wenn die Meldung »Checksummer aktiviert...« auf dem 
Bildschirm erscheint, haben Sie keinen Tippfehler ge¬ 
macht und der Checksummer ist nun eingeschaltet. 

3. Zum Löschen des Basic-Programms geben Sie bitte 
»NEW« ein. Keine Angst, der Checksummer selbst wird da¬ 
durch nicht gelöscht. 

4. Nun können wir den Checksummer testen. Geben Sie 
bitte folgende Zeile ein und drücken Sie die RETURN-Ta¬ 
ste: 1 REM 

In der linken oberen Bildschirmecke sehen Sie nun die 
Prüfsumme über die eben eingegebene Basic-Zeile. Sie 
muß <63> lauten. Dem Checksummer ist es übrigens fast 
egal, ob Sie »1 REM« oder »1 REM« eintippen. Nur innerhalb 
von Anführungszeichen ist die richtige Anzahl von Leerzei¬ 
chen wichtig. Zudem sollten Sie sicherheitshalber auch vor 
jedem THEN-Befehl ein Leerzeichen lassen. Diese Prüf¬ 
summen erscheinen (sofern Sie den Checksummer einge¬ 
schaltet haben) immer dann, wenn Sie eine Basic-Zeile ein¬ 
tippen und dann die RETURN-Taste drücken. Im 64’er-Ma- 
gazin finden Sie die Prüfsumme immer am Ende jeder Pro¬ 
grammzeile. G*6R oi 

Diese Zahlen dürfen Sie NICHT mit abtippen. 

Bild 1 verdeutlicht schematisch die Eingabe. Sie geben 
die Nummer der Programmzeile ein, gefolgt von den Befeh¬ 
len, die sie enthalten soll. Nach Drücken der Taste 
< RETURN > errechnet Ihr Computer eine Prüfsumme, 
die sich durch die Eingabe ergibt. Wenn die Prüfsumme auf 
Ihrem Bildschirm mit der im Listing abgedruckten überein¬ 
stimmt, haben Sie keinen Fehler gemacht. Stimmt sie nicht, 
müssen Sie die Zeile überprüfen und korrigieren. Als Bei¬ 
spiel sehen Sie Bild 2. Am rechten Rand jeder Spalte sehen 
Sie die Prüfsummen in eckigen Klammern. 

Damit sind wir beim zweiten wichtigen Punkt: Sehen Sie 
sich die Zeile 240 von Listing 2 genauer an. Nach dem er¬ 
sten Anführungszeichen nach dem PRINT-Befehl sehen 
Sie eine geschweifte Klammerung (j. Immer, wenn Sie in 
einem unserer Listings diese Klammern sehen, dürfen Sie 
das, was innerhalb der Klammern steht, nicht eintippen. 
Sie müssen die entsprechende Taste drücken. Beispiel: 

10 PRINT * (CLRj" 

bedeutet: nach dem Anführungszeichen die »Bildschirm- 
Iöschen«-Taste drücken (< SHIFT CLR/HOME>). In Tabel- 


CTRL steht für Control-Taste, so bedeutet |CTRL+A|, daß Sie die Control-Taste und die Taste »A« drücken müssen 

Im folgenden steht: 

|DOWN| 

Taste neben rechtem Shift, 

ISPACE] 

Leertaste 

[RVSON| 

Control-Taste & 9 


Cursor unten 

|SHIFT-Space| 

Shift-Taste & Leertaste 

[RVOFFj 

Control-Taste & 0 

[UPI 

Shift-Taste & Taste neben 

|F1] bis [FBI 

Funktionstasten 

[ORANGE) 

Commodore-Taste & 1 


rechtem Shift; Cursor hoch 

[RETURNI 

Return-Taste 

[BROWN| 

Commodore-Taste & 2 

ICLR] 

Shift-Taste & 2. Taste 

I BLACK] 

Control-Taste & 1 

[LIG.RED) 

Commodore-Taste & 3 


ganz rechts oben 

IWHITEI 

Control-Taste & 2 

[GREY 1] 

Commodore-Taste & 4 

[INST| 

Shift-Taste & Taste 

[RED) 

Control-Taste & 3 

IGREY 21 

Commodore-Taste & 5 


ganz rechts oben 

[CYAN] 

Control-Taste & 4 

[LIG.GREEN] 

Commodore-Taste & 6 

[HOME) 

2. Taste von ganz rechts oben 

[PURPLE] 

Control-Taste & 5 

(LIG.BLUE) 

Commodore-Taste & 7 

[DEL] 

Taste ganz rechts oben 

[GREENI 

Control-Taste & 6 

[GREY 3| 

Commodore-Taste & 8. 

JRIGHT] 

Taste ganz rechts unten 

[BLUE) 

Control-Taste & 7 

Tabelle 1. 


(LEFT) 

Shift-Taste & Taste unten rechts 

[YELLOW) 

Control-Taste & 8 

Die Steuerbefehle in den Listings 


5 PRINT CHR$(i4> <242> 

10 PRINT"<CLR>" <254> 

INT“ « > «« « *« > ♦» » »»-»»«»»»»»«-«■ ir" <130> 

30 PRINT " I4D0WN , 2SPACE > 2JEST (SPACE, BLUE , 6SP 

ACE >" <022> 

40 PRINT"WrfWtfrtW1«" <108> 

6 64'et- 

Bild 1. Die Bedeutung der Steuerzeichen 
wird im nachfolgenden Text erklärt 

In Zeile 10 müssen Sie nach den Anführungszeichen die 
Tasten <SHIFT CLR/HOME> drücken und nicht die 
Klammern mit dem Wort CLR eingeben. In Zeile 20 
drücken Sie nach den Anführungszeichen die CBM- 
Taste und den Buchstaben < Q >, gefolgt von mehreren 
SHIFT- und Stern-Tasten und zum Schluß die CBM- 
Taste und den Buchstaben < W>. In Zeile 30 ist es vier¬ 
mal die CURSOR-abwärts-Taste, gefolgt von zweimali¬ 
ger Leertaste, dann < SHIFT T> und normal EST, zum 
Schluß noch einmal die Leertaste, die Farbtaste Blau 
cCTRL 7> und sechsmal die Leertaste. Zeile 40 
besteht lediglich aus mehreren Grafikzeichen, die mit 
der CBM-Taste und <B> erzeugt werden. 


10 PRINT"CHECKSUMMER FUER C 64" 

11 PRINT:PRINT"EINEN MOMENT, BITTE ..." 

12 FOR 1=028 TO 864:READ A-'POKE I,A:PS=PS+ 

A:NEXT I 

13 IF PS0 5765 THEN PRINT "TIPPFEHLER IN DE 
N ZEILEN 20 BIS 22":END 

14 SYS 828:PS=0:FOR 1=58464 TO 58583:READ 
A:POKE I,A:PS=PS+A:NEXT I 

15 IF PS016147 THEN PRINT "TIPPFEHLER IN D 
EN ZEILEN 22 BIS 30":END 

16 POKE 1,53:POKE 42289.86:POKE 42290,228 

17 PRINT"CHECKSUMMER AKTIVIERT." 

18 PRINT:PRINT" AUSSCHALTEN : POKE1.55 ODE 
R"SPC(27)"<RUN/STOP+RESTORE>" 

19 PRINT:PRINT" ANSCHALTEN : POKE1.53" 

20 DATA 169,0,133,254.162.1,189.93,3,133.2 
55,160,0,177,254 

21 DATA 145,254,136,208,249,230,255,165,25 
5,221,95,3,208.238,202 

22 DATA 16,230,96,160,224,192,0,160,2,169, 
0,170,133,254,177 

23 DATA 95,240,40,201,32,208,3,200,208,245 
,133,255,138,41,7 

24 DATA 170,240,14,72,165,255,24,42,105,0, 

202.208.249.133.255 

25 DATA 104,170,232,165,255,24,101,254,133 
,254,76,111,228,192,4 

26 DATA 48,219,198,214,165,214,72.162,3,16 
9,32,157,1,4,189 

27 DATA 212,228,32,210,255,208,12,0,92,72, 

32,201,255.170,104 ' 

28 DATA 144,1.138,96,202,16,228,166,254,16 
9,0.32,205,189,169 

29 DATA 62,32,210,255,104,133,214.32,108,2 

29.169.141.32.210.255 

30 DATA 76,128,164,9,60,18,19 
© 64’er 

Listing 1. Der »Checksummer 64 V3« für Basic-Listings 
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le 1 sehen Sie eine Zusammenfassung aller möglichen 
Steuertasten mit dem entsprechenden Klartext. 

Weiterhin sehen Sie in Bild 2 (Bedeutung der Steuerzei¬ 
chen) in Zeile 30 ein unterstrichenes »T« nach der Klammer. 
Das bedeutet, daß Sie ein »T« zusammen mit der SHIFT- 
Taste drücken müssen, also <SHIFT T>. Wenn ein Zei¬ 
chen »überstrichen« ist, müssen Sie dieses zusammen mit 
der CBM-Taste eingeben. Die CBM-Taste befindet sich 
ganz links unten auf der Tastatur und hat die Aufschrift 
»C=«. Sie werden sich nun fragen, wozu diese Funktion 
vorgesehen ist. Ihr C64 bietet die Möglichkeit, Grafik- und 
Steuerzeichen über die Tastatur aufzurufen. Mit den Tasten 
<SHIFT> und <CBM> schalten Sie auf diese Zeichen 
um. Doch oft kann man diese Zeichen nicht ohne weiteres 
unterscheiden. Drücken Sie einmal die Taste <P> mit 
<CBM> gleichzeitig. Es erscheint ein schmaler kleiner 
Balken auf dem Bildschirm. Wenn Sie die Taste <0> 
gleichzeitig mit <CBM> drücken, erscheint ein geringfü¬ 
gig dickerer Balken. Es ist schwer, diese beiden auseinan¬ 
derzuhalten, wenn sie für sich alleine stehen. 

Der MSE 


Der MSE dient zur Eingabe von Maschinensprache-Pro¬ 
grammen. Als erstes müssen Sie den sogenannten 
»MSE-Lader« (Listing 2) abtippen. Dieser erzeugt erst das 
eigentliche MSE-Programm auf Diskette oder Kassette. 
Wichtig: Vor dem Eintippen des MSE-Laders müssen 
Sie unbedingt ein paar Befehle eingeben (ohne Basic- 
Zeilennummer): POKE 44,32 : POKE 8192,0 : NEW 

Jetzt können Sie beginnen, das Listing 2 abzutippen. Der 
MSE-Lader erkennt zwar, wenn Sie beim Eintippen der DA- 
TA-Zeilen einen Fehler gemacht haben, aber sicherheits¬ 
halbersollten Sie den Checksummervor dem Eintippen ak¬ 
tivieren. Die Prüfsummen für den MSE-Lader finden Sie 
am Ende der jeweiligen Programmzeilen. 

Wenn Sie das Listing 2 nicht auf einmal abtippen möch¬ 
ten, müssen Sie vor jedem neuen Laden des Programms 
unbedingt die oben genannte POKE-Zeile eingeben! 

Wenn Sie alles richtig gemacht haben und das Pro¬ 
gramm fehlerfrei abgetippt wurde, speichert es sich nach 
dem Starten selbst auf Diskette oder Kassette unter dem 
Namen »MSE VI .0«. Dieses fertige MSE-Programm laden 


Sie dann bei Bedarf wie ein normales Basic-Programm und 
starten es mit »RUN«. 

So arbeitet man mit dem MSE 

Als erstes möchte der MSE den Namen des zu bearbei¬ 
tenden Programms wissen. Dieser steht in der ersten Zeile 
unserer MSE-Listings. Dann müssen Sie die Start- und 
Endadresse des Programms (die letzten beiden, vierstelli¬ 
gen Hexadezimalzahlen in der ersten Zeile) eingeben. 

Wenn Sie ein Programm von Diskette oder Kassette la¬ 
den wollen, um an einer bestimmten Stelle weiterzutippen 
oder eine Korrektur vorzunehmen, geben Sie auf die Frage 
nach der Startadresse ein »L« ein. Danach müssen Sie 

< D > oder <T> drückende nachdem, ob Sie von Diskette 
oder Kassette (»tape«) laden möchten. Wenn das Pro¬ 
gramm unter diesem Namen nicht auf der Diskette vorhan¬ 
den ist oder ein sonstiger Ladefehler vorlag, meldet sich der 
MSE mit »l/O-ERROR«. In diesem Fall drücken Sie < RUN/ 
STOP RESTORE> und geben noch einmal »RUN« ein. 

Beim Abtippen geben Sie nach und nach die abgedruck¬ 
ten Buchstaben und Zahlen des jeweiligen Listings ohne 
die Freiräume dazwischen ein. Wenn Sie in einer Zeile ei¬ 
nen Tippfehler gemacht haben, meldet sich der MSE mit ei¬ 
nem Brummton und der Meldung »EINGABEFEHLER«. 
Nach einem Druck auf die RETURN-Taste können Sie mit 

< DEL > den Fehler korrigieren. Wenn Sie das gewünschte 
Programm vollständig eingegeben haben, speichert es der 
MSE automatisch auf Diskette oder Kassette. 

Bei längeren Listings ist es unwahrscheinlich, daß Sie 
das komplette Programm auf einmal eingeben. Sie können 
Ihre bisherige Tipparbeit jederzeit durch <CTRL S> auf 
Diskette oder Kassette speichern und Ihr Werk später fort¬ 
setzen. Sie sollten sich dann allerdings im Heft markieren, 
wie weit Sie beim Abtippen gekommen sind! Später geben 
Sie dan. n nach dem Laden des ersten Programmteils 

< CTRL iv > ein und auf die dann folgende Frage nach der 
Startadresse die Zeilennummer (Adresse), bei der Sie auf¬ 
gehört haben zu tippen. 

<CTRL M> erlaubt Ihnen jederzeit, Ihr Werk listen zu 
lassen. Durch < SPACE > können Sie weiterlisten lassen 
und durch < RUN/STOP > das Listen abbrechen. 

Wenn Sie einen Drucker besitzen, können Sie das Pro¬ 
gramm auch mit <CTRLP> ausdrucken. Mit <CTRLL> 
wird das Programm noch einmal neu in Ihren C 64 geladen. 

(F. Lonczewski/N. Mann/D. Weineck/ad) 


100 

REM DIESES PROGRAMM ERZEUGT DEN 

<210> 


FTFARBE 

<013> 

110 

REM MSE VI.1 AUF DISKETTE. 

<039? 

305 

PRINT”C2SPACE}<2> - HINTERGRUNDFARBE 

<233> 

120 

REM BESITZER EINER DATASETTE 

<178>. 

306 

PRINT”CDOWN,2SPACE}<9> - FARBEN UEBERN 


130 

REM MUESSEN DIE ’8’ AM ENDE VON 

< 145> 


EHMEN 

<15B> 

140 

REM ZEILE 343 IN EINE '1 * AENDERN! 

<176> 

307 

PRINT'C2DOWN7FARBE <1>:”R:PRINT"FARBE 


150 

REM 

<212> 


< 2 > : ” H 

<066> 

230 

IF PEEK(44)<>32 THEN PRINT"CCLR}SIE HA 


308 

GET A •• IF A=0 THEN 308 

<210> 


BEN VERGESSEN, DIE POKES EINZUGE- BEN! 


309 

IF A=1 THEN R=(R+11AND 15 

<098> 


” s END 

<050> 

310 

IF A=2 THEN H=<H+1)AND 15 

<086> 

240 

PRINT"CCLR}"i:DIM H(75):FOR 1=0 TO 9 

<042> 

311 

IF A=9 THEN 340 

<217> 

250 

H<48+1)=1:H<65+1>=1+10:NEXT:2=1000 

< 136> 

312 

GOTO 301 

<034> 

260 

FOR 1=2048 TO 3755 STEP 20:PRINT"CHOME 


340 

POKE 2106,H:POKE 2111,R 

<153> 


.7ICH LESE ZEILE: "Z 

<253> 

342 

POKE 631,19:POKE 632,13:POKE 198,2 

<135> 

261 

FOR N=0 TO 19!READ A$:IF LEN(AS><>2 TH 


343 

PRINT”CCLR}SAVE”CHR$(34)”MSE VI.1”CHR$ 



EN 900 

<062> 


(34)”,8 

<091 > 

262 

IF PEEKt 63 H-PEEK« 641*25602 THEN 800 

<011 > 

344 

POKE 43,1:POKE 44,8:POKE 45,172:POKE 4 


270 

H=ASC ( LEFTS ( A$ , 1 ) 1 : L=ASC. (RIGHTS (AS , 1 ) 1 

< 199> 


6,14:END 

<140> 

280 

D=H(H)*16+H(L):S=S+D:POKE I+N.D 

<165> 

800 

PRINT”CCLR.RVS0N7SIE HABEN ZEILE”Z”CLE 


290 

NEXT: READ V:IF SOV THEN 900 

<139> 


FT.SPACE}VERGESSEN:":A=PEEK(646)AND 15 

<124> 

300 

S=0:Z=Z+1:NEXT:R=PEEK(21111:H=PEEK(210 


810 

POKE 646,PEEKC53281)AND 15:PRINT"LIST” 



6) 

<126> 


Z-2”-”Z+2:POKE 646,A 

<224> 

301 

POKE 53280,R:POKE 53281,H^POKE 646,R:P 


820 

GOTO 920 

<082> 


RINT"CCLR7DIE DATA-ZEILEN SIND FEHLERF 


900 

PRINT”CCLR,RVS0N7SIE HABEN EINEN TIPPF 



REI! " 

<080> 


EHLER GEMACHT:":A=PEEK(646)AND 15 

<154> 

302 

PRINT”SIE KOENNEN NUN DIE FARBEN DES M 


910 

POKE 646,PEEKC53281)AND 15:PRINT”LIST” 



SE" 

<209> 


Z:POKE 646,A 

<173> 

303 

PRINT"EINSTELLEN.":PRINT"C2D0WN,SPACE, 


320 

POKE 631,19:POKE 632,17:POKE 633,13:PO 



RVS0N7DRUECKEN SIE <1>, <2> ODER <9> 

<205> 


KE 198,3:END 

<126> 

304 

PRINT"CDOWN,2SPACE7 <1> - RAHMEN-/SCHRI 


1000 DATA 00,0B,08,0A,00,9E,32,30,36,31,00 




160 


SONDERHEFT 26 









C64 


EINGABEHILFEN 


,00,00,A2,08,A9,36,85,A4,A9, 1247 <119> 

1001 DATA 08.85.A5.A9.00.85.A6.A9.B0.85.A7 

,A0,00.Bl.A4.91.A6.C8.D0.F9i 2888 <054> 

1002 DATA E6,A5,E6,A7,CA,D0,F2,A9,36,85,01 

,4C,00,B0,20.Dl.Bl.A9,00.8D, 2781 <096> 

1003 DATA 21,D0.A9.0F.8D.20,D0,8D,86,02,A0 

,B3,A9.74,20.FF.B1.A0.B3.A9. 2679 <089> 

1004 DATA B9.20,FF.Bl.A0.00,20.CF,FF,99.01 

.02.C8,C9■0D,D0,F5,88,F0,D2, 2912 <217> 

1005 DATA C0,11,90.02,A0.10,8C,00,02,20.EA 

•Bl,A0.B3.A9.CF,20,FF.B1,20, 2327 <045> 

1006 DATA 8E.B4,85,FC,85■62,20.8E,B4,85,FB 

,85,61,20,A7,B4,D0,20,A0.B3, 2864 <199> 

1007 DATA A9,E5,20,FF,B1,20.8E,B4,85,60,20 

,8E,B4,85,5F,20,A7,B4,D0,0A, 2624 <091> 

1008 DATA A5.61,C5,5F,A5,62,E5,60,90,06,20 

,43,B3,4C,3A,B0,A9,AA,A0.00, 2379 <167> 

1009 DATA EA,EA,E6,FB,D0,02,E6,FC,20,3F,B2 

,90,EF,4C,FB,B4,A2,02.86,58, 3190 <041> 

1010 DATA A9,A6,A0,9D,20,F2,Bl,20,E4,Ff,F0 

,FB,C9,30,90.0C,C9,47,B0,08, 2970 <231> 

1011 DATA C9,3A,90,0B,C9,41.B0,07.C9,14,D0 

,0F,4C,0B,Bl,20,D2.FF,A6,58, 2322 <121> 

1012 DATA 95,F7,C6,58,D0,D2,60,AE,8D,02,F0 

,26,C9,0C,D0,03,4C,0B,B6,C9, 2685 <057> 

1013 DATA 13,D0,03,4C,8B,B5,C9,0D,D0,03,4C 

,BA,B4,C9,10,D0,03,4C,68,B5, 2282 <225> 

1014 DATA C9,0E,D0,06,20,5F,B4,4C,64,Bl,4C 

,92,B0,A5,F9,20,02,B1.0A,0A, 2132 <208> 

1015 DATA 0A,0A,85,F9,A5,F8,20,02,Bl,05,F9 

,60,C9,3A,90,02,69,08,29,0F, 1950 <092> 

1016 DATA 60,A6,59,E0,08,90,1F,A6,58,E0,02 

,B0,06,20,D2.FF,4C.8E,B0,C6, 2509 <188> 

1017 DATA 59,A0,14,A9,92,20,F2,B1.CA,D0,FA 

,84,57,68,68,4C,8B,B1,A6,D3, 2891 <197> 

1018 DATA E0,08,B0,03,4C,92,B0,20,D2,FF,A6 

,58,E0,02,90,09,C6,59,20,D2, 2468 <049> 

1019 DATA FF,C6,58,D0,F9,4C,8E,B0,48,4A,4A 

,4A,4A,20,59,B1,68,29,0F,C9, 2419 <035> 

1020 DATA 0A,90,02,69,06,69,30,4C,D2,FF,A2 

•FC,9A,20,Dl,Bl,20,48,B2,20, 2261 <073> 

1021 DATA EA,Bl,20,9F,B2,A5,FC,20,4E,Bl,A5 f 

,FB,20,4E,B1,20,ED,Bl,A9,3A, 2860 <148> 

1022 DATA A0,20,20.F2,B1,A9,00.85,59,20,8E 

,B0,20,ED,B1,A4,59,20,EF,B0, 2530 <233> 

1023 DATA 91,FB>C8,84,59,C0,08,90,EC.20,10 

,B2,A9,12,20.D2,FF,20,8E,B0, 2657 <105> 

1024 DATA 20,EF,B0,C5,FF,F0,0D,20,43,B3,A9 

,14,A0,14,20,F2,B1,4C,A2,B1, 2665 <034> 

1025 DATA A9,92,20,D2,FF,20,33,B2.20,E0,B2 

,20,3F,B2,90,9F,4C,8B,B5,A9, 2648 <123> 

1026 DATA 93,20,D2,FF,A2,00,A9,03.9D.00,D8 

,9D,00,D9,9D,00,DA,9D,00,DB, 2476 <237> 

1027 DATA E8,D0,EF,60,A9,0D,2C.A9,20,4C,D2 

,FF,20.D2.FF,98,4C,D2,FF,20, 2965 <160> 

1028 DATA E4,FF,F0,FB.60,84,5D,85,5C,A0,00 

,B1,5C,F0,06,20,D2,FF,C8.D0, 3100 <077> 

1029 DATA F6.60,A5,FB,85,5A,A0,00,84,5B,Bl 

,FB,18,65,5A,85,5A,90,02.E6, 2606 <156> 

1030 DATA 5B,06,5A,26,5B,C8,C0.08,90,EC,A5 

,5A,65,5B,85,FF,60,18,A5,FB, 2467 <219> 

1031 DATA 69,08,85,FB,90,02.E6,FC,60,A5,FB 

,C5,5F,A5,FC,E5,60,60,A0,B3, 3106 <183> 

1032 DATA A9,FB,20,FF.Bl.A0.01,B9,00,02,20 

,D2,FF,CC,00,02,C8,90,F4,A9. 2692 <098> 

1033 DATA 14,ED,00,02,AA,20,ED.Bl,CA,D0,FA 

,A5,62,20,4E,B1,A5,61,20,4E, 2457 <060> 

1034 DATA B1,20,ED,B1.A5,60,20,4E,B1,A5,5F 

,20,4E,Bl,EA,EA,EA,EA,EA,EA, 3122 <190> 

1035 DATA EA,EA,24,5E,10,01,60,A9,12,20,D2 

,FF,A2,28,20,ED,B1,CA.D0.FA, 2703 <087> 

1036 DATA A9,92,4C,D2,FF,A5.D6,C9,16,B0,01 

,60,A9,A0,85,A4,A9,78,85,A6, 2945 <204> 

1037 DATA A9,04,85,A5,85,A7,A2,13,A0,27,Bl 

.A4,91,A6.88,10.F9,CA.F0,19, 2671 <208> 

1038 DATA 18,A5,A4,69,28,85,A4,90,02.E6,A5 

,18,A5.A6,69,28,85,A6,90,E0, 2503 <251> 

1039 DATA E6,A7,4C,B6,B2.A9,91,4C.D2.FF,A9 

,0F,8D,18,D4,A9.00,8D,05.D4, 2776 <000> 

1040 DATA A9,F7,8D,06,D4,A9,11,8D,04,D4,A9 

,32,8D,01,D4,A9,00,8D,00,D4, 2413 <126> 

1041 DATA A0,80,20,09, B3 . A9,10,8D, 04, D4 ,-60 

,A2,FF,CA,D0,FD,88,D0,F8,60, 2914 <240> 

1042 DATA A9,0F,8D,18,D4,A9.2D,8D.05,D4,A9 

,A5,8D,06,D4,A9,21,8D,04,04, 2385 <119> 

1043 DATA A9,07,8D,01,D4,A9,05,8D,00,D4,A0 


,FF.20,09.B3,A9,20,8D,04,D4. 2250 <078> 

1044 DATA A9,00,80,01,D4,8D,00,D4,60,38,20 

,F0,FF.8A,48,98,48,18.A0,06, 2179 <1?5> 

1045 DATA A2,18,20.F0,FF,A0,B4,A9,0A,20.FF 

,Bl,20,12,B3,20,E4,FF,F0,FB, 2931 <093> 

1046 DATA A2,ID,A9.14,20,D2,FF,CA,D0,FA,68 

,AB,68,AA,18,4C.F0,FF,0D,0D, 2704 <088> 

1047 DATA 00,20,20,20,20,20,20,20,40,41,53 

,43,48,49,4E,45,4E,53,50,52, 1144 <216' 

1048 DATA 41,43,48,45,20,2D.20,45,44,49,54 

,4F,52,20,00,00,20,20,20,20, 1023 <03B’ 

1049 DATA 20,20,20,20,56,4F,4E,20,4E,2E,4P 

,41,4E.4E,20,26,20,44.2E,57, 1128 <206> 

1050 DATA 45,. 49.4E, 45,43,4B . 00,0D , 0D , 0D . 20 

,20.20,50,52,4F,47,52,41,4D, 1102 ,117> 

1051 DATA 4D.4E.41,4D,45,20,3A,20.00,00,0D 

,20,20,20,53,54,41,52,54,41, 1073 <095> 

1052 DATA 44,52,45,53,53,45.20.3A,20,24,00 

,0D,0D,20,20,20.45.4E,44,41, 1014 <129> 

1053 DATA 44,52,45,53,53,45,20.20,20,3A,20 

,24,00,92,01,01,50.52,4F,47, 1136 <228> 

1054 DATA 52,41,4D,4D,20,3A,20,00.12,20,20 

,2A,2A,2A,20,46,41,4C,53,43, 1024 <027> 

1055 DATA 48,45,20,45,49,4E,47,41,42,45.20 

,2A,2A,2A,20,20,92,00,0D,0D, 1058 <098> 

1056 DATA 2A,2A,2A,20.45,4E,44,45.20,2A,2A 

,2A,00,13,01.20,20,12.44,92, 916 <153> 

1057 DATA 49,53,4B,20,4F,44,45,52,20,12,54 

,92,41,50,45,00,00,13,20,20, 1151 <035> 

1058 DATA 49,2F.4F,20,20,20,46,45.48.40,45 

,52,00.20,Dl,Bl,20,48,B2,A0, 1606 <012> 

1059 DATA B3,A9,CF.20,FF,Bl,20,8E,B4.85,FC 

,20,8E,B4,85,FB,C5,61,A5,FC, 3207 <251> 

1060 DATA E5,62,90,23,A5,FB,C5,5F,A5,FC,E5 

,60,B0,19,20,A7,B4,D0,14,60, 2860 <112) 

1061 DATA 20,A7,B4,F0,0C,85,F9,20,A7,B4,F0 

,05,85,F8,4C,EF,B0,68,68,20, 2749 <088' 

1062 DATA 43,B3,4C,5F,B4,20,CF,FF.C9,4C,D0 

,09,20,D1,B1,20,48,B2,4C,0B, 2372 <046> 

1063 DATA B6,C9,0D,60,A9,00,85,5E,20,5F,B4 

,20,EA,Bl,20,0D,B5,24,5E,30, 2042 <120> 

, 106« DATA 05,20,E4,FF,F0,FB,20,El,FF,F0,26 

** ,'20,9F,B2,24,5E,10,09,20,4E, 2435 <198> 

1065 DATA B5,20,0D,B5,20,60,B5,20,33,B2,20 

,3F,B2,90,D7,A0,B4,A9.28,20. 2190 <207> 

1066 DATA FF,Bl.20,E4,FF.C9,0D,D0,F9,A9,00 

,85,5E,A5,61,85,FB,A5,62,85, 3056 <240> 

1067 DATA FC,20,E0,B2,4C,64,B1,A5,FC,20,4E 

,Bl,A5,FB,85,FF,20,4E,Bl,A9, 3003 <221> 

1068 DATA 20,A0,3A,20,F2,B1,A0,00,20,ED,B1 

,Bl,FB,20,4E,Bl,C8,C0,08,90, 2566 <070) 

1069 DATA F3,20,ED,B1,24,5E,30,03,A9,12,2C 

,A9.20,20,D2,FF,20,10.B2,A5, 2190 <059> 

1070 DATA FF,20,4E,Bl,A9,92,20,D2,FF,4C.EA 

,Bl,A9.FF.85,B8,85,B9,A9,04, 3073 <029> 

1071 DATA 85,BA,20,C0,FF,A2,FF,4C,C9,FF.20 

,CC,FF,A9,FF.4C,C3,FF,20,5F, 3315 <189> 

1072 DATA B4,A9,80,85,5E,20,4E,B5,20.48,B2 

, A2,24, A9,2D, 20 ,D2 , FF,CA , D0 . 2596 <1U> 

1073 DATA FA,20.EA,B1,20,EA,B1,20,60,B5,4C 

,C1,B4.20,B8,B5,A6,5F,A4.60, 2812 <015> 

1074 DATA A9.61,20,D8,FF.B0,0A,20.B7,FF,29 

,BF.D0,03,4C,FB,B4,A9,01,20, 2577 <201> 

1075 DATA C3,FF,20,68,B6.A0,B4,A9.4F,20,FF 

,Bl,20,F9,Bl,4C,FB,B4,20,68, 2921 <237> 

1076 DATA B6,A9,37,A0,B4,20.FF.B1,20,F9,B1 

,A2,08,C9,44,F0.06,A2,01,C9, 2717 <213) 

1077 DATA 54.D0.F1.A9.01,A8,20,BA,FF,A0,00 

,E0,01,F0,1A,A9,40,8D,20,02, 2403 <101> 

1078 DATA A9,3A,8D,21.02,B9,01,02.99,22.02 

,C8,CC,00.02,90,F4,C8,C8,D0. 2182 <127> 

1079 DATA 0C.B9.01,02,99,20,02,C8,CC,00,02 

,D0,F4,98,A2,20,A0,02,4C,BD, 2018 <025> 

1080 DATA FF,20,B8.B5,A5,BA,C9,08,90,33.A6 

,B9,86,57,A9,01,20,C3,FF,A9, 2800 <022> 

1081 DATA 60,85,B9,20,C0,FF.B0,28.A5,BA,20 

,B4,FF.A5,B9.20,96,FF,20,A5, 2911 <053> 

1082 DATA FF,85,61,A5,90,4A,4A,B0,13,20,A5 

,FF.85,62,20,AB,FF,A5,57,85, 2663 <214> 

1083 DATA B9,A9,00,20,D5,FF,90.03.4C,A3,B5 

,86,5F,84,60,A5,BA,C9.01,D0, 2639 <131> 

1084 DATA 0A,AD,3D,03,85,61,AD,3E,03,85,62 

,4C,FB,B4,A9,13,20,D2,FF,A2, 2300 <120> 

1085 DATA IC,20,ED,Bl,CA,D0,FA.60,00,00,00 

,00,00,00.00,00.00,00.00,00. 1230 <143> 

© 64’er Listing 2. Der MSE-Lader 
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